本人编写的 可 更改 任意打印机的默认纸张类型、 大小、走纸方向的
可自定义纸张的 dll文件,使用时,可先设置纸张大小及方向,然后程序中调用打印,即可 按照指定 纸张大小 走纸, 控制准确,更改迅速,
更改完之后 还可 将 打印机默认纸张 还原为调用前的纸张类型
虽用vb编码,但其他语言也可调用此dll
详细函数调用如下
'以下函数均可独立使用
Dim p As New PrinSetUserDefine.PrintSetUserDefine
'改变指定打印机的 默认纸张大小及方向,指定打印机不一定是默认打印机
Call p.StartPrintUserPage(28, 24, 1, "EPSON LQ-1600K IIIH ESC/P 2")
'改变当前默认打印机的 默认纸张大小及方向
Call p.StartPrintUserPage(28, 24, 1)
Dim height As Double
'可以获取 指定打印机名的 最大支持纸张高度
height = p.GetMaxPaperLength_Dmm("EPSON LQ-1600K IIIH ESC/P 2")
'也可将指定打印机名 设为 默认打印机, 对于必须设置为默认打印,才可调用打印报表的程序 非常有用
Call p.SetPrinterToDefault("EPSON LQ-1600K IIIH ESC/P 2")
'还原打印机默认纸张为 自定义之前的纸张
Call p.EndPrintUserPage
1