Vla-put-numberofcopies

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年2月22日 (月) 13:56時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-numberofcopies vla-object num)


機能
印刷部数を指定する。


引数
  • vla-object … Plot の VLAオブジェクト
  • num … 印刷部数


戻り値
なし


  • このプロパティを再設定せずに PlotToDevice を呼び出すと、NumberOfCopies プロパティに最後に指定された値が使用される。


サンプル
(vl-load-com)
(defun c:Example_NumberOfCopies()
    ;; レイアウトを印刷するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
  
    (setq AddedLayouts (vlax-make-safearray vlax-vbString (cons 0 (1- (vla-get-Count (vla-get-Layouts doc)))))
          ArraySize 0)
  
    (vlax-for oLayout (vla-get-Layouts doc)
        (vlax-safearray-put-element AddedLayouts ArraySize (vla-get-Name oLayout))
        (setq ArraySize (1+ ArraySize))
    )

    (setq oPlot (vla-get-Plot doc))
    (vla-SetLayoutsToPlot oPlot AddedLayouts)
    (Vla-put-numberofcopies oPlot 1)
    (vla-PlotToDevice oPlot "DWF6 ePlot.pc3")
    (alert "印刷は" (Vla-get-numberofcopies oPlot) "部出たかね?")
)

関連事項