如何设置小型打印纸张?
如果要打印小型纸张(如:毕业证书\医疗清单\明信片\信封等),那么应该怎么设置打印纸张,是否一定要用printer.width=?,printer.height=?(自定义类型).
问:用printer自定义类型是否支持各种操作系统(98-XP),大家在开发的过程中有没有其它的好办法.
问题点数:10、回复次数:2Top
1 楼mingtian2008(明天)回复于 2005-08-03 09:52:09 得分 0
不需要的.但是需要自己调整 打印的位置.
给你看看我以前做的一个结业证打印的代码
'_________打印
Printer.FontName = "宋体"
Printer.FontSize = "12"
Printer.CurrentY = 800
Printer.CurrentX = 850
Printer.Print tempPrint.Name
Printer.CurrentY = 800
Printer.CurrentX = 2600
Printer.Print tempPrint.Sex
Printer.CurrentY = 800
Printer.CurrentX = 3950
Printer.Print Format(tempPrint.KDate, "YYYY")
Printer.CurrentY = 800
Printer.CurrentX = 5150
Printer.Print Format(tempPrint.KDate, "MM")
Printer.CurrentY = 800
Printer.CurrentX = 5750
Printer.Print Format(tempPrint.KDate, "DD")
Printer.CurrentY = 1600
Printer.CurrentX = 750
Printer.Print Format(tempPrint.ZDate, "YYYY")
Printer.CurrentY = 1600
Printer.CurrentX = 2000
Printer.Print Format(tempPrint.ZDate, "MM")
Printer.CurrentY = 1600
Printer.CurrentX = 2650
Printer.Print Format(tempPrint.ZDate, "DD")
Printer.FontBold = True
Printer.CurrentY = 1600
Printer.CurrentX = 4600
Printer.Print StrTemp1
Printer.FontSize = "8"
Printer.CurrentY = 1670
Printer.CurrentX = 4720
Printer.Print StrTemp2
Printer.FontSize = "12"
Printer.FontBold = False
Printer.CurrentY = 4100
Printer.CurrentX = 1550
Printer.Print tempPrint.Nume
Printer.CurrentY = 5800
Printer.CurrentX = 5200
Printer.Print Format(tempPrint.Adddate, "YYYY")
Printer.CurrentY = 5800
Printer.CurrentX = 6400
Printer.Print Format(tempPrint.Adddate, "MM")
Printer.CurrentY = 5800
Printer.CurrentX = 7250
Printer.Print Format(tempPrint.Adddate, "DD")
Printer.EndDoc
Top
2 楼hexingwu(西域小子)回复于 2005-08-03 11:39:52 得分 0
我也遇到你这样的问题呀,你刚才的设置在98里面才行,在2000里面不行。
我正愁得很呢,急死我了。希望懂的人能来这里说说吗?
最好就是能不改变打印机的设置而临时改变打印Top




