Returns an EdgeCollection containing each Edge in the PolygonFace.
set oObject = Application.ActiveProject.ActiveScene.Root.AddGeometry("Cube","MeshSurface")
set oPolygonMesh = oObject.ActivePrimitive.Geometry
set oPolygonFace = oPolygonMesh.Polygons(0)
set oEdges = oPolygonFace.Edges
|