NurbsCurveの各ControlPointオブジェクトを含むControlPointCollectionを戻します。
// get accessor ControlPointCollection rtn = NurbsCurve.ControlPoints; |
set oObject = Application.ActiveProject.ActiveScene.Root.AddGeometry("Arc","NurbsCurve") set oNurbsCurveList = oObject.ActivePrimitive.Geometry set oNurbsCurve = oNurbsCurveList.Curves(0) set oControlPoints = oNurbsCurve.ControlPoints |