「Tinc:getconstrainttype」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (tinc:getconstrainttype ''ename'' ''constraint'' ) ; 機能 : TinSurface エンティティに対する制約のタイプ、またはN…」)
 
編集の要約なし
30行目: 30行目:
(setq constraint (tinc:getAllConstraints tin))
(setq constraint (tinc:getAllConstraints tin))
nil
nil
(tinc:getbreaklinetype tin (entlast))


; 適当に制約作図してから
; 適当に制約作図してから
 
(tinc:getconstrainttype tin (tinc:getconstraintid tin (entlast)))
(tinc:getconstrainttype tin (tinc:getconstraintid tin constraint))
1
1
</pre>
</pre>

2022年10月31日 (月) 06:58時点における版

構文
(tinc:getconstrainttype ename constraint )


機能
TinSurface エンティティに対する制約のタイプ、またはNILを返す。


引数
  • ename : TinSurface エンティティの ename または VLAオブジェクト。
  • constraint : 問い合わせる制約の整数 または ename。


戻り値
制約タイプの値(0 = bcTinBreakline, 1 = bcTinBoundary, 2 = bcTinWal)または NIL


  • メモ
    • 指定された制約がブレークラインタイプでない場合、NIL を返す。


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))
(setq constraint (tinc:getAllConstraints tin))
nil
(tinc:getbreaklinetype tin (entlast))

; 適当に制約作図してから
(tinc:getconstrainttype tin (tinc:getconstraintid tin (entlast)))
1

関連事項