Delphi 7:如何打印TChart?

3

如何打印 TChart?

我已经显示了一个 TChart,并且屏幕中有一个 TButton。

当 TButton 被点击时,Windows 打印机对话框将会显示,TChart 将会被打印到所选的打印机上。

我该如何在 Delphi 7 中实现这个功能呢?

谢谢。

1个回答

4

这非常容易:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TPrintDialog.Create(nil) do
    try
      if Execute then
        Chart1.Print;
    finally
      Free;
    end;
end;

那个可以打印,但是TChart图像在中间被缩小了。我该如何将其横向打印并填满纸张? - Kawaii-Hachii
2
@ewlung:您可以自己调整打印设置。一些尝试的方法:(1)使用“PrintPortrait”而不是“Print”,(2)将“PrintProportional”设置为相反,(3)更改“PrintMargins”,(4)更改“PrintRect”,... - Andreas Rejbrand
1
@ewlung 我可能也对http://www.teechart.net/support/viewtopic.php?t=5827上的“打印更好”的文章感兴趣。 - Narcís Calvet

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接