ホーム / モデリング / CGaudiBody / 関数 / Chamfer2

Chamfer2関数

定義

Chamfer2 (Distance1 As Double, Distance2 As Double) As Boolean

戻り値

True		成功
False		失敗

引数

Distance1		一つ目の面取り距離
Distance2		二つ目の面取り距離

解説

指定したSolidBodyに含まれるすべての辺に面取りをします。
指定した辺の両側の面に対して個別に距離を設定します。
距離の指定順序は指定辺の両側の面のトポロジIDの昇順です。  

実行例

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)

    

'------- Chamfer2 -------

Body0.Chamfer2 2.0, 1.0

実行前		実行後