打印整页delphi

时间:2015-02-28 15:53:50

标签: delphi printing delphi-xe

每当我在delphi中打印一个from时,它都不会打印到整个页面。它水平使用所有页面,但它仅垂直使用页面的大约3/4。

我的代码是:

printer.Orientation:=poLandscape;
form1.PrintScale:=poPrintToFit;
printer.Copies:=spinedit1.Value;
form1.Print;

有什么建议吗?感谢

我尝试过更改表单大小并尝试其他打印机不会产生任何结果,它会打印完全相同的东西。

1 个答案:

答案 0 :(得分:0)

你正是得到了你想要的。打印机正在生成一个1963到1056的屏幕图像,它应该很好地映射到11.7 x 8.3纸张的顶部3/4。前3/4将是大约11.7 x 6.2。 (1963/1056约等于11.7 / 6.2)您正在打印宽高比约为2比1的图像;打印的图像具有相同的纵横比。如果打印的图像填满了整个页面,那么根据您的视角,它会被视为太高或太窄的扭曲。如果你要在角落附近的表格上扔一些其他控件,你会更清楚地看到这一点。它们将显示在打印页面上。