CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2018 开发者帮助 › 查看内容

AutoCAD 2018 开发者帮助

Plot 属性（ActiveX）

2024-5-18 16:54| 发布者: admin| 查看: 242| 评论: 0|原作者: admin|来自: AutoCAD

Plot 属性（ActiveX）

获取文档的 Plot 对象。

支持的平台：仅限 Windows

签名

VBA：

object.Plot

对象

类别： 文档

此属性应用于的对象。

属性值

只读：是的

类型： 剧情

文档的 Plot 对象。

言论

没有其他评论。

例子

VBA：

Sub Example_Plot()
    ' This example sends a plot of the current drawing
    ' to a file.
    
    ThisDrawing.ActiveLayout.ConfigName = "DWF6 ePlot.pc3"
    
    ' Define the plot variable
    Dim currentPlot As AcadPlot
    Set currentPlot = ThisDrawing.Plot
    
    ' Define the output file name.
    ' Use "" to use the drawing name as the file name.
    ' Note: if the file name exists an error will be generated.
    Dim plotFileName As String
    plotFileName = "MyPlot"
    
    currentPlot.PlotToFile plotFileName
    
End Sub

可视化 LISP：

(vl-load-com)
(defun c:Example_Plot()
    ;; This example sends a plot of the current drawing
    ;; to a file.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
  
    ;; Set a device current that outputs to a file
    (vla-put-ConfigName (vla-get-ActiveLayout doc) "DWF6 ePlot.pc3")

    ;; Define the plot variable
    (setq currentPlot (vla-get-Plot doc))
    
    ;; Define the output file name.
    ;; Use "" to use the drawing name as the file name.
    ;; Note: if the file name exists an error will be generated.
    (setq plotFileName "MyPlot")

    (vla-PlotToFile currentPlot plotFileName)
)