ペーパー空間ビューポート内のすべてのジオメトリを先に印刷するかどうかを指定します。
サポートされているプラットフォーム: 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"))) )