Vle-vlaobjectp

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年1月28日 (土) 08:19時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vle-vlaobjectp obj)


機能
obj が VLAオブジェクトかどうかを調べる
(= (type obj) 'VLA-OBJECT) と同様。


引数
  • obj : 値


戻り値
T= 'obj' は VLA-オブジェクト、nil = 'obj' は VLA-オブジェクトではない


サンプル

<syntaxhighlight lang="lisp" line> (vle-vlaobjectp 123) nil

(vle-vlaobjectp 123.0) nil

(vle-vlaobjectp T) nil

(vle-vlaobjectp "ENAME") nil


(defun test_vlaobjectp ()

 (setq *actdoc* (vla-get-activedocument (vlax-get-acad-object)))
 (if (vle-vlaobjectp myarc) (princ "VLAだす") (princ "VLAじゃないだす"))
 (princ)

)

</syntaxhighlight>



関連事項