「Mech:get-constraints」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_MECH}} ; 構文 : (mech:get-constraints ''idBlock'' [ ''createIfNotExist'' ]) ; 機能 : 指定されたidBlock(ename)BlockTableRecordに対する 3DCo…」)
 
編集の要約なし
1行目: 1行目:
{{BCAD_LISP_MECH}}
{{BCAD_LISP_MECH}}
; 構文
; 構文
: (mech:get-constraints ''idBlock'' [ ''createIfNotExist'' ])
: (mech:get-constraints ''constraintsGroup'')




; 機能
; 機能
: 指定されたidBlock(ename)BlockTableRecordに対する 3DConstraintsのリストを返す。
: constraintsGroup (integer)が transient group (dwgに保存されていない)かどうかを確認する。
: idBlockに制約グループが割り当てられておらず、createIfNotExistがNILでない場合、新しい制約グループが作成される。




; 引数
; 引数
:*  idBlock : (ename) 問い合わせるBlockTableRecord。
:*  constraintsGroup : (integer) トランジェントステータスを問い合わせるための制約グループ
:*  createIfNotExist : (T/nil) nil 以外の場合、idBlock BlockTableRecord がなければ場合に新しい ConstraintGroup が作成される。




; 戻り値
; 戻り値
: 3DConstraintsの整数リストまたは nil
: 指定されたconstraintsGroup が transient オブジェクト(dwgファイル内で永続しない)であれば T、そうでなければNIL




22行目: 21行目:
(vl-load-mech)
(vl-load-mech)
2
2
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
(setq res (mech:get-allconstraintsgroups))
<Entity name: a44cefc0>
(2698242080 2698242176)
(setq grp (mech:get-constraintsgroup blkId))
(setq grp (car res))
2684693328
2698242080
(setq constraints (mech:get-constraints grp))
(mech:get-istransient grp)
(2684692368)
nil
(setq constraint (nth 0 constraints))
 
2684692368
</pre>
</pre>



2023年6月3日 (土) 08:24時点における版

構文
(mech:get-constraints constraintsGroup)


機能
constraintsGroup (integer)が transient group (dwgに保存されていない)かどうかを確認する。


引数
  • constraintsGroup : (integer) トランジェントステータスを問い合わせるための制約グループ


戻り値
指定されたconstraintsGroup が transient オブジェクト(dwgファイル内で永続しない)であれば T、そうでなければNIL


サンプル
(vl-load-mech)
2
(setq res (mech:get-allconstraintsgroups))
(2698242080 2698242176)
(setq grp (car res))
2698242080
(mech:get-istransient grp)
nil



関連事項