Parameter | Type | Description | ||||
---|---|---|---|---|---|---|
compIdx | Integer | Index of the component
|
'Create a cube CreatePrim "Cube", "MeshSurface" set oSelList = GetValue("SelectionList") set oItem = oSelList(0) set oGeometry = oItem.obj oNb2D = oGeometry.Nb2D set o2DComponent = oGeometry.Geometry2D ' Loop on all the 2D Component for i = 0 to oNb2D - 1 o0D2DSubComp = o2DComponent.SubComponent0D2D( i ) for j = LBound( o0D2DSubComp, 1 ) to UBound( o0D2DSubComp, 1 ) LogMessage "Component [" & i & "] 0D2D SubComponent : " & o0D2DSubComp(j) next next |
Geometry2D.SubComponent0D Geometry2D.SubComponent1D Geometry2D.Nb0D2D Geometry2D.SubComponent0D2DNormal Geometry2D Geometry_V1.Nb2D SIVector3