Returns a Long representing the index of the segment within the SegmentCollection returned by the Geometry.Segments property.
set oRoot = Application.ActiveProject.ActiveScene.Root
set oObj = oRoot.AddGeometry( "Cube", "MeshSurface" )
set oGeometry = oObj.ActivePrimitive.Geometry
for each oSegment in oGeometry.Segments
LogMessage "Geometry.Segment[" & oSegment.Index & "].Index = " & oSegment.Index
next
|