NurbsSurface の完全なデータ記述を設定します。このメソッドはスクリプトオペレータからのみ使用できます。このメソッドをクラスタのあるオブジェクトに使用してトポロジを変更した場合は、クラスタの更新はユーザが実行する必要があります。スクリプトオペレータでないオペレータの場合は、このプロパティは、オブジェクトがフリーズされている場合にのみ設定できます。
NurbsSurface.Set( Object in_vsaUVControlPoints, Object in_vsaUKnots, Object in_vsaVKnots, Object in_vbUClosed, Object in_vbVClosed, Object in_vlUDegree, Object in_vlVDegree, Object in_veUParam, Object in_veVParam, siNurbsFormat in_eNurbsFormat ); |
NurbsSurface.Set( ControlPoints, [UKnots], [VKnots], [UClosed], [VClosed], [UDegree], [VDegree], [UParameterization], [VParameterization], [NurbsFormat] ); |
パラメータ | タイプ | 説明 |
---|---|---|
ControlPoints | 3DArray |
コントロールポイントは 3D 配列に格納されます。 配列は、4 * V ControlPoint の数 * U ControlPoint の数です。 |
UKnots | DoubleのArray | U方向のノット値の配列 |
VKnots | DoubleのArray | V方向のノット値の配列 |
UClosed | Boolean | NURBS サーフェイスが U 方向で閉じられているかどうかを指定します。 |
VClosed | Boolean | NURBS サーフェイスが V 方向で閉じられているかどうかを指定します。 |
UDegree | Long | NURBS サーフェイスの U 方向の次数 |
VDegree | Long | NURBS サーフェイスの V 方向の次数 |
UParameterization | siKnotParameterization | NURBS サーフェイスの U 方向のパラメータ配置方法 |
VParameterization | siKnotParameterization | NURBS サーフェイスの V 方向のパラメータ配置方法 |
NurbsFormat | siNurbsFormat |
NURBs のデータ形式を指定します。 デフォルト値:siSINurbs |
Dim lDegree(2), bClosed(2), eParameterization(2), aControlPoints, aKnots(2) set oRoot = Application.activeproject.activescene.root set oSphere = oRoot.AddGeometry( "Sphere", "NurbsSurface" ) FreezeObj oSphere oSphere.ActivePrimitive.Geometry.Surfaces(0).Get _ siSINurbs, _ aControlVertex, _ aKnots(siUDirection),aKnots(siVDirection) , _ bClosed(siUDirection),bClosed(siVDirection), _ lDegree(siUDirection),lDegree(siVDirection), _ eParameterization(siUDirection),eParameterization(siVDirection) for i = lbound(aControlVertex,3) to ubound(aControlVertex,3) for j = lbound(aControlVertex,2) to ubound(aControlVertex,2) aControlVertex(0,j,i) = aControlVertex(0,j,i) + 1 aControlVertex(1,j,i) = aControlVertex(1,j,i) + 1 aControlVertex(2,j,i) = aControlVertex(2,j,i) + 1 aControlVertex(3,j,i) = aControlVertex(3,j,i) + 1 next next ' Create new nurbs surface list from arc data. oSphere.ActivePrimitive.Geometry.Surfaces(0).Set _ aControlVertex, _ aKnots(siUDirection),aKnots(siVDirection), _ bClosed(siUDirection),bClosed(siVDirection), _ lDegree(siUDirection),lDegree(siVDirection), _ eParameterization(siUDirection),eParameterization(siVDirection), _ siSINurbs |