Topsolid online Help Index
Created : v6.6
IShape.GetFaceShells(FaceId, ShellIds)
This method finds the ids of the shells of a face.
|
IN:
|
Long FaceId |
Id of the face you want the shells.
|
|
OUT:
|
Variant ShellIds (array) |
Array of the ids of the shells (array of long). |
Dim BodyIds As Variant
Dim BodyCount As Long
Dim BodyId As Long
Dim FaceIds As Variant
Dim FaceCount As Long
Dim FaceId As Long
Dim ShellIds As Variant
Dim ShellCount As Long
Dim ShellId As Long
Dim i As Integer
Dim j As Integer
Dim k As Integer
...
TopShape.GetBodies BodyIds
BodyCount = UBound(BodyIds, 1)
For i = 0 To BodyCount
BodyId = BodyIds(i)
TopShape.GetBodyFaces BodyId, FaceIds
FaceCount = UBound(FaceIds, 1)
For j = 0 To FaceCount
FaceId = FaceIds(j)
TopShape.GetFaceShells FaceId, ShellIds
ShellCount = UBound(ShellIds, 1)
For k = 0 Top ShellCount
ShellId = ShellIds(k)
...
Next k
Next j
Next i
Topsolid online Help Index