
v3.0
NurbsCurveオブジェクトからSubComponentを作成します。
set oObject = ActiveSceneRoot.AddGeometry("Arc","NurbsCurve")
set oNurbsCurveList = oObject.ActivePrimitive.Geometry
set oSubComponent = oNurbsCurveList.Curves(0).SubComponent
logmessage oSubComponent
|