ホーム / モデリング / CGaudiEdge / 関数 / Chamfer3

Chamfer3関数

定義

Chamfer3 (Distance As Double, bChangeDirection As Boolean, Angle As Double) As Boolean

戻り値

True		成功
False		失敗

引数

Distance		面取り距離
bChangeDirection		距離の指定方向を変更する(True)、変更しない(False)
Angle		角度

解説

SolidBodyの指定辺に面取りをします。
引数で面取り距離と角度を設定します。
距離の指定方向は指定辺の両側の面のトポロジIDの小さい面の方向です。
引数bChangeDirectionで距離の指定方向を変更できます。  

実行例

Dim Femtet As New CFemtet

Dim Gaudi As CGaudi

 

'新規プロジェクト作成

If Femtet.OpenNewProject() = False Then

    Femtet.ShowLastError

End If

    

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

Set Gaudi = Femtet.Gaudi

       

'------- CreateBox -------

Dim Body0 As CGaudiBody

Dim Point0 As New CGaudiPoint

Point0.SetCoord 0, 0, 0

Set Body0 = Gaudi.CreateBox(Point0, 5, 5, 5)

    

'------- Chamfer3 -------

Dim Edge0 As CGaudiEdge

Set Edge0 = Body0.GetEdgeByID(34)

Edge0.Chamfer3 1.0, True, 60

実行前		実行後