「Param:constraint-get-dimension」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
 
(同じ利用者による、間の1版が非表示)
1行目: 1行目:
{{BCAD_LISP_MECH}}
{{BCAD_LISP_MECH}}
; 構文
; 構文
: (mech:constraint-get-dimension ''constraint'' )
: (param:constraint-get-dimension ''constraint'' )




22行目: 22行目:
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
<Entity name: a44cefc0>
<Entity name: a44cefc0>
(setq grp (mech:get-constraintsgroup blkId))
(setq grp (param:get-constraintsgroup blkId))
2684693328
2684693328
(setq constraints (mech:get-constraints grp))
(setq constraints (param:get-constraints grp))
(2684692368)
(2684692368)
(setq constraint (nth 0 constraints))
(setq constraint (nth 0 constraints))
2684692368
2684692368
(setq dimobj (mech:constraint-get-dimension constraint))
(setq dimobj (param:constraint-get-dimension constraint))
nil
nil
</pre>
</pre>

2024年10月6日 (日) 00:41時点における最新版

構文
(param:constraint-get-dimension constraint )


機能
指定された拘束がディメンショナルであるかどうかを返す。


引数
  • constraint : 問い合わせる拘束の整数値


戻り値
ディメンショナルであれば T、それ以外は NIL


サンプル
(vl-load-mech)
2
(setq blkId (tblobjname "BLOCK" "*Model_Space"))
<Entity name: a44cefc0>
(setq grp (param:get-constraintsgroup blkId))
2684693328
(setq constraints (param:get-constraints grp))
(2684692368)
(setq constraint (nth 0 constraints))
2684692368
(setq dimobj (param:constraint-get-dimension constraint))
nil



関連事項