TeeChart For VCL/FMX V2017使用教程：第十四章 – 打印图表

---

目录
14.1标准打印 简单的打印命令 打印方向 打印预览 打印分辨率 灰度打印	14.2  扩展的打印方法 局部打印 打印多页图表 在一页上打印预览几张图表

---

14.1 标准打印

        TeeChart Pro提供了标准的打印方法来打印屏幕上的图表，就像打印机一样。

14.1.1简单的打印命令

        为了打印一个图表要使用Print方法。这将在屏幕上显示图表打印出来。
        示例

                    Chart1.Print;

14.1.2 打印方向

        PrintPortrait和PrintLandscape方法允许您打印这些方向，即使它们没有被定义为缺省值。在打印完成后，默认的方向将再次生效。使用PrintOrientation方法可以改变默认的方向。PrintOrientation方法不会为你打印。你必须在改变PrintOrientation后运行打印。

示例

With Chart1 do
begin
  PrintOrientation(poLandscape);
  Print;
end;

14.1.3 打印预览

        PrintPreview窗口将向您展示在打印时该图表将如何显示。在将作业发送到打印机之前，您可以在打印预览窗口中修改打印参数。为了调用PrintPreview要运行：

//将teeprevi单元添加到项目的Uses部分

ChartPreview(Self,Chart1);

14.1.4 打印分辨率

        打印分辨率是指被打印图表细节的水平，不要与打印机分辨率混淆，后者是在Windows的打印管理中定义的。TeeChart的打印分辨率定义了在打印的图表中包含的TeeChart细节的总量，它的坐标轴刻度范围细节，网格线的密度等等。它的值范围是0-100%的百分比。

        示例

//这将使用屏幕分辨率

Chart1.PrintResolution := 0;

//这将会使用更多的打印机分辨率

Chart1.PrintResolution := 100; 

14.1.5 灰度打印

        当打印到灰度打印机时，你需要注意的是，当转换成灰度的阴影时，图表的颜色很容易区分。为了帮助您，您可以在图表序列中添加刷子样式，以便在打印时更容易地区分序列。

14.2 扩展的打印方法

14.2.1 局部打印

        使用PrintPartial方法将图表打印到打印机上，并控制打印页面上的尺寸和位置。PrintPartial不排除页面，因此允许您在每个页面上打印多个图表。您需要调用Delphi的BeginDoc和EndDoc方法来打开和关闭打印机。

    示例

//将Printer单元添加到项目的Uses部分
 Printer.BeginDoc;
 Chart1.PrintPartial(Rect(0,0,500,300));
 Chart2.PrintPartial(Rect(0,400,900,700));
 Printer.EndDoc;

14.2.2 打印多页图表

        有关打印多页图表的信息（在这里，MaxPointsPerPage小于总数）请查看图表分页教程。

14.2.3 在一页纸上打印预览几张图表

        Print Preview（打印预览）面板现在可以接受多个图表(或TeePanel)。图表位置由设置PrintMargins属性来被控制。使用TeePreviewPanel1.Panels收集器来管理预览页面上的图表。

 {改变边界}
  Chart1.PrintProportional:=False;
  Chart2.PrintProportional:=False;
  Chart1.PrintMargins:=Rect(2,2,60,60);
  Chart2.PrintMargins:=Rect(60,60,2,2);
  {添加到预览}
  TeePreviewPanel1.Panels.Add(Chart1);
  TeePreviewPanel1.Panels.Add(Chart2);

        只有一个图表可能会在一个视图中被鼠标拖动到预览器上，所以您必须禁用第一个图表，以启用拖动第二个图表的重新定位。这个TeeChart演示项目包括一个页面，代码如下：

With TeePreviewPanel1 do
  begin
    Panels.Clear;
    if CheckBox1.Checked then Panels.Add(Chart1);
    if CheckBox2.Checked then Panels.Add(Chart2);
    Repaint;
  end;

        通过选择两个复选框中的一个或另一个(当这两个复选框只显示第一个图表的时候是可移动的)，您可以通过鼠标拖动重新定位页面上的图表。

---

十四章完