PolygonNode のインデックスを含むLongを戻します。
set oObject = Application.ActiveProject.ActiveScene.Root.AddGeometry("Cube","MeshSurface")
set oPolygonMesh = oObject.ActivePrimitive.Geometry
set oPolygonFace = oPolygonMesh.Polygons(0)
set oPolygonNode = oPolygonFace.Nodes(0)
logmessage "The index is: " & oPolygonNode.Index
|