从模型空间打印

AutoCAD ActiveX/VBA

 
从模型空间打印
 
 
 

通常情况下,当打印较大的图形(例如平面布置图)时,可以指定一个比例将实际图形单位转换为打印英寸或毫米。如果从模型空间打印时未指定设置,则使用默认设置。默认设置包括打印到系统打印机、打印当前显示、缩放到充满、0 旋转和 0,0 偏移。要修改打印设置,请修改与模型空间关联的 Layout 对象的特性。

打印活动模型空间布局的范围

本样例首先检查以确保活动空间是模型空间,然后创建若干打印设置,最后使用 PlotToDevice 方法发送打印。

Sub Ch9_PrintModelSpace()
    ' 验证活动空间是模型空间
    If ThisDrawing.ActiveSpace = acPaperSpace Then
        ThisDrawing.MSpace = True
        ThisDrawing.ActiveSpace = acModelSpace
    End If
      
    ' 设置打印区域的范围和比例
    ThisDrawing.ModelSpace.Layout.PlotType = acExtents
    ThisDrawing.ModelSpace.Layout. _
                          StandardScale = acScaleToFit
      
    ' 将打印份数设置为 1
    ThisDrawing.Plot.NumberOfCopies = 1
      
    ' 初始化打印
    ThisDrawing.Plot.PlotToDevice
End Sub

设备名称可以使用 ConfigName 特性指定。此设备可以在 PlotToDevice 方法中通过指定 PC3 文件来替代。