CAD开发者社区 › 首页 ›AutoCAD二次开发指南› ActiveX 开发指南› ActiveX：开发人员指南› 定义和打印布局› 关于打印图形（VBA/ActiveX） › 查看内容

ActiveX 开发指南

关于从模型空间和图纸空间打印（VBA/ActiveX）

2023-1-4 20:17| 发布者: admin| 查看: 877| 评论: 0|来自: AutoCAD

摘要: 通常，在打印大型图形（如平面图）时，可以指定比例以将实际图形单位转换为打印的英寸或毫米。

通常，在打印大型图形（如平面图）时，可以指定比例以将实际图形单位转换为绘制的英寸或毫米。

但是，从模型空间打印时，如果未指定设置，则使用的默认值包括打印到系统打印机、打印当前显示、缩放以适合、0 旋转和 0,0 偏移。要修改打印设置，请更改与模型空间关联的 Layout 对象的属性。

绘制活动模型空间布局的范围

此示例首先检查以确保活动空间为模型空间。然后，该示例将建立多个绘图设置。最后，使用该方法发送绘图。PlotToDevice

Sub Ch9_PrintModelSpace()
    ' Verify that the active space is model space
    If ThisDrawing.ActiveSpace = acPaperSpace Then
        ThisDrawing.MSpace = True
        ThisDrawing.ActiveSpace = acModelSpace
    End If

    ' Set the extents and scale of the plot area
    ThisDrawing.ModelSpace.Layout.PlotType = acExtents
    ThisDrawing.ModelSpace.Layout. _
 StandardScale = acScaleToFit

    ' Set the number of copies to one
    ThisDrawing.Plot.NumberOfCopies = 1

    ' Initiate the plot
    ThisDrawing.Plot.PlotToDevice
End Sub

可以使用该属性指定设备名称。可以通过指定 PC3 文件在方法中重写此设备。ConfigNamePlotToDevice