Vla-get-activelayout

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


機能
アクティブレイアウトのVLAオブジェクトを返す


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


戻り値
アクティブレイアウトのVLAオブジェクト


サンプル
; 現在のレイアウトを取得する。
(setq Clayout (getvar "ctab"))

; VLAオブジェクトから現在のレイアウトを取得する。
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object)))
(setq Clayout (vlax-get-property (vla-get-activelayout *ActDoc*) 'Name))

; ダンプ
(vlax-dump-object (vla-get-activelayout *ActDoc*))
; IAcadLayout: モデル空間またはペーパー空間ブロックの印刷設定および表示プロパティ
; プロパティの値:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00000001402191d8>
;   Block (RO) = #<VLA-OBJECT IAcadModelSpace 000000002b9891b8>
;   CanonicalMediaName = "Letter_(8.50_x_11.00_Inches)"
;   CenterPlot = 0
;   ConfigName = "なし"
;   Document (RO) = #<VLA-OBJECT IAcadDocument 000000002b4038d0>
;   Handle (RO) = "493"
;   HasExtensionDictionary (RO) = -1
;   ModelType (RO) = -1
;   Name = "Model"
;   ObjectID (RO) = 52
;   ObjectID32 (RO) = 52
;   ObjectName (RO) = "AcDbLayout"
;   OwnerID (RO) = 53
;   OwnerID32 (RO) = 53
;   PaperUnits = 0
;   PlotHidden = 0
;   PlotOrigin = (0.0 0.0)
;   PlotRotation = 1
;   PlotType = 0
;   PlotViewportBorders = 0
;   PlotViewportsFirst = -1
;   PlotWithLineweights = -1
;   PlotWithPlotStyles = -1
;   ScaleLineweights = 0
;   ShowPlotStyles = 0
;   StandardScale = 0
;   StyleSheet = ""
;   TabOrder = 0
;   UseStandardScale = -1
;   ViewToPlot = "ALL"