ホーム / モデリング / CGaudi / 関数 / CreatePolygonArc2

CreatePolygonArc2関数

定義

CreatePolygonArc2(Center As CGaudiPoint, P1 As CGaudiPoint, P2 As CGaudiPoint, nDivision　as Long) As CGaudiBody

戻り値

成功した場合は新規に作成されたBodyが返ります。
失敗した場合は、Nothingが返ります。

引数

Center		円の中心点
P1		円上の点１(始点)
P2		円上の点２(終点)
nDivision		分割数

解説

指定された点を中心とする円上の２点からなる多角弧を作成します。
円が作成される平面は、現在の作業平面の原点をCenterに平行移動させた平面であり、現在の主軸における「右ネジの法則」によりP1からP2を結びます。
P1またはP2が円上に無い場合はエラーとなり、Nothingが返ります。

実行例

Dim Femtet As New CFemtet
Dim Gaudi As CGaudi
Dim Body As CGaudiBody
Dim Center As New CGaudiPoint
Dim P1 As New CGaudiPoint
Dim P2 As New CGaudiPoint

'新規プロジェクト作成
If Femtet.OpenNewProject() = False Then
    Femtet.ShowLastError
End If

'Femtet.Gaudiを変数Gaudiに代入して使いやすくする
Set Gaudi = Femtet.Gaudi



Center.X = 0
Center.Y = 0
Center.Z = 0
P1.X = -1
P1.Y = 0
P1.Z = 0
P2.X = 0
P2.Y = 1
P2.Z = 0

Set Body = Gaudi.CreatePolygonArc2(Center, P1, P2, 3)