Vla-get-activelayer
- 構文
- (vla-get-activelayer vla-object)
- 機能
- アクティブ画層のVLAオブジェクトを取得する
- 引数
-
- vla-object … CAD のアプリケーション オブジェクト
- 戻り値
- アクティブ画層のVLAオブジェクト
- サンプル
; VLAオブジェクトから現在画層色を取得。 (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) (setq col1 (vla-get-color (vla-get-ActiveLayer *ActDoc*))) ; テーブルから現在画層の色を取得。 (setq col1 (cdr (assoc 62 (tblsearch "layer" (getvar "CLAYER")))))