図形情報 (Visual LISP)
vlax-get-acad-object
今使っているAutoCADの情報を得る
引数:なし
戻り値:AutoCADのVLAオブジェクト名
vla-get-ActiveDocument
今編集している図面ファイルのVLAオブジェクト名を得る
引数: AutoCADのVLAオブジェクト情報
戻り値: 図面ファイルのVLAオブジェクト名
例:今編集している 図面ファイルのVLAオブジェクト名を得る。
(vla-get-ActiveDocument (vlax-get-Acad-Object))
vla-get-プロパティ名
プロパティの VLAオブジェクト名
引数: VLAオブジェクト名
戻り値:引数で渡したVLAオブジェクトのプロパティの VLAオブジェクト名
例:今編集しているAutoCADファイルの画層情報の VLAオブジェクト名 を得る
(vla-get-layers
(vla-get-ActiveDocument
(vlax-get-Acad-Object)
)
)
vla-item
要素のVLAオブジェクト名
引数: VLAオブジェクト名
戻り値:引数で渡したVLAオブジェクトの要素の VLAオブジェクト名
例:今編集しているAutoCADファイルの画層情報の VLAオブジェクト名 を変数Layer_VLAに代入し、vla-itemで画層”0” のVLAオブジェクト名を得る
(setq Layer_VLA
(vla-get-layers
(vla-get-ActiveDocument
(vlax-get-Acad-Object)
)
)
)
(vla-item Layer_VLA "0")
vlax-ename->vla-object
AutoLISPオブジェクト名をVLAオブジェクト名に変換
引数: AutoLISP オブジェクト名
戻り値:引数で渡したオブジェクトの VLAオブジェクト名
例: (car(entsel) で得たオブジェクト名をVLAオブジェクト名に変換して変数VlObjに入れる
(setq VlObj (vlax-ename->vla-object (car(entsel))))
vlax-dump-object
VLAオブジェクト名からプロパティを一覧を得る
引数: VLAオブジェクト名
戻り値:引数で渡した VLAオブジェクトのプロパティ一覧
例: 画層”0” のVLAオブジェクト名を得てプロパティの一覧にする。
(setq Layer_VLA
(vla-get-layers
(vla-get-ActiveDocument
(vlax-get-Acad-Object)
)
)
)
(vlax-dump-object (vla-item Layer_VLA "0"))
例:今編集しているAutoCADファイルのプロパティの一覧を得る。
(vlax-dump-object
(vla-get-ActiveDocument
(vlax-get-Acad-Object)
)
)
例:選択した図形のVLAプロパティの一覧を得る。
(setq VlObj (vlax-ename->vla-object (car(entsel))))
(vlax-dump-object VlObj)