码迷,mamicode.com
首页 > 编程语言 > 详细

CAD直接打印,不出现打印对话框(com接口VB语言)

时间:2019-06-11 14:52:27      阅读:170      评论:0      收藏:0      [点我收藏+]

标签:pap   接口   ott   设置   文档   nbsp   esb   PDF文件   param   

主要用到函数说明:


MxDrawXCustomFunction::Mx_Print


直接打印,不出现打印对话框,详细说明如下:


参数 说明

double ptLBx

打印的范围左下角x

double ptLBy

打印的范围左下角y

double ptRTx

打印的范围右上角x

double ptRTy

打印的范围右上角y

LPCTSTR pszPrintName

打印机名,如果传为空,取系统默认打印机

LPCTSTR pszPaperName

打印的图纸名,如果传为空,取系统默认打印机设置

LONG iPrintDirection

打印的方向,2 为横向,1为纵向,默认取1

LONG iLeftMargin

打印的页边的左边距离,如果为-1,取打印机默认的页边距

LONG iRightMargin

打印的页边的右边距离,如果为-1,取打印机默认的页边距

LONG iTopMargin

打印的页边的上边距离,如果为-1,取打印机默认的页边距

LONG iBottomMargin

打印的页边的下边距离,如果为-1,取打印机默认的页边距

LPCTSTR pszLayoutName

打印的布局,为NULL就是模型Model中的内容

LPCTSTR pszPrintConfig

打印配制,暂没有使用

LPCTSTR pszDocName

打印的文档名称,在用pdf虚拟打印机时,指定打印的pdf文件的缺省文件名

LONG lIsPrintLineWdith

是否打印线宽,默认值为1,表示打印,传0表示不打印

iFlag

pRectPageMargin参数的含义,iFlag = 0表示页边距,iFlag = 1表示打印区域矩形框位置


VB代码实现如下:


1
2
3
4
5
6
7
8
9
10
11
12
13
‘打印10,10,100,100范围的图纸到当前系统默认设置打印机
Dim printParam As MxDrawResbuf
Set printParam = New MxDrawResbuf
打印的左下角10,10
printParam.AddDouble 10
printParam.AddDouble 10
 
‘ 打印的右上角100,100
printParam.AddDouble 100
printParam.AddDouble 100
 
开始打印
MxDrawX1.CallEx "Mx_Print", printParam

CAD直接打印,不出现打印对话框(com接口VB语言)

标签:pap   接口   ott   设置   文档   nbsp   esb   PDF文件   param   

原文地址:https://www.cnblogs.com/yzy0224/p/11003370.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!