打印整页delphi

每当我在delphi中打印from时，它不会打印到整个页面。它在水平方向上使用了所有页面，但在垂直方向上只使用了大约3/4的页面

我的代码是：

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

有什么建议吗？谢谢

---

我尝试过改变表单大小，尝试其他打印机也不会有结果，它会打印完全相同的内容。

您得到的正是您想要的。打印机正在生成1963 x 1056的屏幕图像，该图像应该很好地映射到11.7 x 8.3纸张的顶部3/4。顶部的3/4大约为11.7 x 6.2。（1963/1056约等于11.7/6.2）您正在打印宽高比约为2:1的图像；打印图像具有相同的纵横比。如果打印的图像填满了整个页面，它会被扭曲，看起来要么太高要么太窄，这取决于你的视角。如果在靠近拐角处的窗体上放置一些其他控件，您会更清楚地看到这一点。它们将显示在打印页上。

可能是表单的纵横比造成的吗？增加表单的高度以测试是否存在这种情况。同时检查打印机边框设置，以查看它们是否不会干扰最终结果。正如SilverWarrior所说：打印机是否可以打印到纸张边缘？表单的大小（以像素为单位）和纸张的大小（以英寸或毫米为单位）。既然您是横向打印，那么当您说垂直打印页面的3/4是什么意思？当你把纸变成风景画时，是垂直的吗？通过您的设置，我得到一个打印输出，一直到边缘，除了不可打印的区域，大约5毫米。使用表格（宽x高）553 x 383像素在210 x 297mm纸张上进行测试（比率0.71）。表格尺寸为1056 x 1963。我用的是A4纸，所以是11.7x8.3英寸。我的意思是，当水平握住页面时，它不会打印到页面底部，它只打印到页面底部约3/4，如果你理解的话，它会一直水平打印到边缘，但不会垂直打印。打印时，我如何获得/强制使用整个A4页面？谢谢你的回复！查看Delphi帮助主题TCustomForm.PrintScale。你用了poPrintToFit，我认为这是你最好的选择。你可以选择poProportional或poNone，看看其中一个是否更适合你的需要。要使图像填满页面，您可以将窗口的比例更改为11.7x8.3的倍数，例如1170x830或1755x1245