ペーパー空間ビューポート内のすべてのジオメトリを先に印刷するかどうかを指定します。
サポートされているプラットフォーム: Windows のみ
読み込み専用: いいえ
タイプ: ブール型
追加の注意はありません。
VBA:
Sub Example_PlotViewportsFirst()
' This example reads and modifies the PlotViewportsFirst
' Layout value.
' When finished, this example resets the value back to
' its original value.
Dim ACADLayout As ACADLayout
Dim originalValue As Boolean
' Get the layout object
Set ACADLayout = ThisDrawing.ActiveLayout
' Read and display the original value
originalValue = ACADLayout.PlotViewportsFirst
MsgBox "The PlotViewportsFirst value is set to: " & originalValue
' Modify the PlotViewportsFirst preference by toggling the value
ACADLayout.PlotViewportsFirst = Not ACADLayout.PlotViewportsFirst
MsgBox "The PlotViewportsFirst preference has been set to: " & ACADLayout.PlotViewportsFirst
' Reset the preference back to its original value
ACADLayout.PlotViewportsFirst = originalValue
MsgBox "The PlotViewportsFirst preference was reset back to: " & originalValue
End Sub
Visual LISP:
(vl-load-com)
(defun c:Example_PlotViewportsFirst()
;; This example reads and modifies the PlotViewportsFirst
;; Layout value.
;; When finished, this example resets the value back to
;; its original value.
(setq acadObj (vlax-get-acad-object))
(setq doc (vla-get-ActiveDocument acadObj))
;; Get the layout object
(setq ACADLayout (vla-get-ActiveLayout doc))
;; Read and display the original value
(setq originalValue (vla-get-PlotViewportsFirst ACADLayout))
(alert (strcat "The PlotViewportsFirst value is set to: " (if (= originalValue :vlax-true) "True" "False")))
;; Modify the PlotViewportsFirst preference by toggling the value
(vla-put-PlotViewportsFirst ACADLayout (if (= originalValue :vlax-true) :vlax-false :vlax-true))
(setq newValue (vla-get-PlotViewportsFirst ACADLayout))
(alert (strcat "The PlotViewportsFirst preference has been set to: " (if (= newValue :vlax-true) "True" "False")))
;; Reset the preference back to its original value
(vla-put-PlotViewportsFirst ACADLayout originalValue)
(alert (strcat "The PlotViewportsFirst preference was reset back to: " (if (= originalValue :vlax-true) "True" "False")))
)