如何在 delphi 中打印表格

Question

我想在 delphi 中打印一个表格，但我不确定如何去做。我试过摆弄“打印对话框”，但无法打印任何内容。

感谢任何帮助。

Answer 1

您可以简单地调用 Print method of TForm. Use the PrintScale 属性来额外控制打印的缩放方式。

打印对话框，TPrintDialog 仅显示用于打印的标准系统对话框。这允许用户select一台打印机，改变它的属性，select一个打印范围，份数，是否整理等等。当对话框 returns 时，您可以阅读该信息并采取相应行动。换句话说，TPrintDialog 允许您从用户那里检索一些选择，但不执行任何打印。您仍然必须执行实际打印，允许这些选择。

因此您的代码可能如下所示：

if PrintDialog.Execute then
begin
  // account for any user choices, reading from PrintDialog properties
  PrintScale := ...;
  for i := 1 to PrintDialog.Copies do
    Print;
end;

如何在 delphi 中打印表格

How to print a form in delphi

printing

delphi

delphi-xe