3

如何打印 TChart?

我显示了一个 TChart,屏幕上有一个 TButton。

单击 T 按钮时,将显示 Windows 打印机对话框,并将 TChart 打印到选定的打印机。

如何使用 Delphi 7 做到这一点?

谢谢。

4

1 回答 1

4

这很容易:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TPrintDialog.Create(nil) do
    try
      if Execute then
        Chart1.Print;
    finally
      Free;
    end;
end;
于 2011-12-06T14:37:53.200 回答