Femtet2026.0マクロヘルプ/マニュアル
 

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

CreateCircleFace関数

定義

CreateCircleFace (Center As CGaudiPoint, R As Double) As CGaudiBody

戻り値

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

引数

Center   円の中心
R   半径
 

解説

指定した中心点と半径から成る円(面)を作成します。
円が作成される平面は、現在の作業平面の原点をCenterに平行移動させた平面です。
半径が小さすぎる場合などはエラーとなり、Nothingが返ります。

実行例

Dim Femtet As New CFemtet
Dim Gaudi As CGaudi
Dim Body As CGaudiBody
Dim Point As New CGaudiPoint

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

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




Point.X = 0
Point.Y = 0
Point.Z = 1

Set Body = Gaudi.CreateCircleFace(Point, 3)