使用的是ActiveReport纸张是一个细长型纸张,因纸太长打印时只能竖放着打
__________________________________
|打印打印 |
|_________________________________|如上图所示,我记得以前在只要改了PageSettings.Orientation = ddOLandscape就可以了但是今年在激光打印机上打印,改了,打印不能横打_____
|打印|
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
------是不是激光打印机不支持横打,改成针打就可以了
方法一、在打印机的服务器属性中,新建纸张,ActiveReport中使用该纸张,正常打印预览正常,横打出边界方法二、直接在ActiveReport中设置,如下所示Private Sub ActiveReport_ReportStart()
Printer.RenderMode = 1
Me.PageSettings.PaperSize = 255
Me.PageSettings.PaperWidth = 567 * 38
Me.PageSettings.PaperHeight = 567 * 12.5
Printer.Orientation = ddOLandscape
End Sub这样设置后,预览完全正常,可就是打印机,实际打印时1、在windows2003和XP中,走纸正确,但只能打印一小半,另一半停止不动2、在win2000中,打印的位置在打印机的最右边,但也不走纸走全,只走一半
ActiveReport我使用是是 2.0 12 68我试了其他版本,包括最新的 2.0 12 82 同样的不行打印机完全正常,在word中设置该纸张能正常横打,打印测试页也正常
真是太奇怪了