
Returns a PointCollection containing every Point object for this object.
// get accessor PointCollection rtn = Geometry.Points; |
set oRoot = Application.ActiveProject.ActiveScene.Root
set oObj = oRoot.AddGeometry( "Cube", "MeshSurface" )
set oGeometry = oObj.ActivePrimitive.Geometry
for i=0 to oGeometry.Points.Count - 1
set oPos = oGeometry.Points(i).Position
Application.LogMessage oPos.x & "," & oPos.y & "," & oPos.z
next
|