Tingr:set-slopeside

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Tingr:set-slopeside grading side )


機能
グレーディング TinGrading エンティティが使用する斜面側を割り当てる。


引数
  • grading : TinGrading のエンティティ名(ename または vla-object)。
  • side : 傾斜側を表す整数。bcTinGradingSideLeft=0、 bcTinGradingSideRight=1


戻り値
設定成功なら T、そうでなければ nil


MEMO

  • 勾配側は、勾配ルール tingr:setsloperule に基づくグレーディング・エンティティーにのみ適用される
  • 勾配側面については ETinGradingSide を参照。


サンプル
(vl-load-tin)
(setq gr (car (entsel)))
(tingr:get-slopeside gr)
0
(tingr:set-slopeside gr 1)
T
(tingr:get-slopeside gr)
1

(tingr:get-slopeside (car (entsel))) ; グレーディングでない図形を選択した場合
nil



関連事項