Vle-vlaobjectp

提供：GizmoLabs - だいたい CAD LISP なサイト
2018年12月25日 (火) 15:59時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vle-vlaobjectp ''obj'') ; 機能 : obj が VLAオブジェクトかどうかを調べる : (= (type obj) 'VLA-OBJECT) と同様。 ; 引数 :...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター
構文
(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>


関連事項

「https://wiki.gz-labs.net/index.php?title=Vle-vlaobjectp&oldid=7802」から取得