Vla-get-activelinetype

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(vla-get-activelinetype vla-object)


機能
現在の線種のVLAオブジェクトを返す。


引数
  • vla-object … CAD アプリケーションの VLAオブジェクト


戻り値
現在の線種のVLAオブジェクト


サンプル
 ; 現在の線種を取得する
(setq ltype1 (getvar "CELTYPE"))

; VLAオブジェクトから現在の線種を取得する
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq ltype1 (vlax-get-property (vla-get-activelinetype *ActDoc*) 'Name))

; ダンプ
(vlax-dump-object (vla-get-activelinetype *ActDoc*))
; IAcadLineType: ダッシュ、ドット、スペースの組み合わせから構成された線の特性
; プロパティの値:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00000001402191d8>
;   Description = ""
;   Document (RO) = #<VLA-OBJECT IAcadDocument 000000002b4038d0>
;   Handle (RO) = "13"
;   HasExtensionDictionary (RO) = 0
;   Name = "BYLAYER"
;   ObjectID (RO) = 54
;   ObjectID32 (RO) = 54
;   ObjectName (RO) = "AcDbLinetypeTableRecord"
;   OwnerID (RO) = 55
;   OwnerID32 (RO) = 55