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

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
1行目: 1行目:
{{BCAD_LISP_MECH}}
{{BCAD_LISP_MECH}}
; 構文
; 構文
: (mech:get-constraints ''constraintsGroup'')
: (mech:get-constraints ''idBlock'' [ ''createIfNotExist'' ])




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




; 引数
; 引数
:* constraintsGroup : (integer) トランジェントステータスを問い合わせるための制約グループ
:* idBlock : (ename) 問い合わせるブロックテーブルレコード。
:* createIfNotExist : nil 以外を指定した場合、idBlock の BlockTableRecord がまだ存在しなければ新しい拘束ブループを作成する。




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


21行目: 23行目:
(vl-load-mech)
(vl-load-mech)
2
2
(setq res (mech:get-allconstraintsgroups))
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
(2698242080 2698242176)
<Entity name: a3c8b900>
(setq grp (car res))
(setq grp (mech:get-constraintsgroup blkId))
2698242080
2752346592
(mech:get-istransient grp)
(mech:get-constraints grp)
nil
(2752356192)
 
</pre>
</pre>



2023年6月5日 (月) 02:03時点における版

構文
(mech:get-constraints idBlock [ createIfNotExist ])


機能
指定されたidBlock(ename)BlockTableRecordに対する3DConstraintsのリストを返す。
idBlockに拘束グループが割り当てられておらず、createIfNotExist が NIL でない場合、新しい拘束グループが作成される。


引数
  • idBlock : (ename) 問い合わせるブロックテーブルレコード。
  • createIfNotExist : nil 以外を指定した場合、idBlock の BlockTableRecord がまだ存在しなければ新しい拘束ブループを作成する。


戻り値
整数のリストまたは NIL


サンプル
(vl-load-mech)
2
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
<Entity name: a3c8b900>
(setq grp (mech:get-constraintsgroup blkId))
2752346592
(mech:get-constraints grp)
(2752356192)



関連事項