Tinc:isvalidconstraint

提供:GizmoLabs - だいたい CAD LISP なサイト
2022年11月26日 (土) 06:09時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (tinc:isvalidconstraint ''tinename'' ''constraint'') ; 機能 : constraint の id値またはename が、tinename の TinSurfaceに対…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(tinc:isvalidconstraint tinename constraint)


機能
constraint の id値またはename が、tinename の TinSurfaceに対して有効な制約であるかどうかを返す。
entは、TinSurfaceという名前に対して有効な制約です。


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


戻り値
有効なら T、そうでなければ 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) ))

(tinc:isValidConstraint tin 4787)
NIL

; 適当に壁の制約作図してから
(setq constraint (tinc:getAllConstraints tin))
(tinc:isValidConstraint tin (car constraint )
T 

関連事項