TeeChart For VCL/FMX V2017使用教程：第十五章 - XML导出和导入

最新推荐文章于 2020-03-30 19:32:48 发布

孤独的学者

最新推荐文章于 2020-03-30 19:32:48 发布

阅读量318

点赞数

分类专栏： TeeChartV2017帮助文章标签： teechart delphi vcl fmx 教程

TeeChartV2017帮助专栏收录该内容

16 篇文章 9 订阅

订阅专栏

前言

TeeChart 5及其后来版本支持图表序列数据的XML输出。

6及其后来版本支持XML格式的数据输入。

本教程展示了关于以XML格式导出和导入图表数据的详细讲解。

15.1 导出

在设计时或运行时使用图表导出对话框，图表数据可以很容易地导出为XML格式：

图1，TeeChart对话框，data（数据）选项卡标签。

在这个对话框中，您可以选择要导出哪个序列(或者“all”导出所有系列)，以及您是否想要导出Point Index（点索引）(0、1、2…等等)，Point Labels（点文字-标签)或Point Colors（点颜色）。

“Copy”按钮生成XML文本并将其复制到Windows或Linux剪贴板。“Save”按钮创建一个新的XML文件。

with Internet Explorer. 例如，可以使用InternetExplorer打开XML文件，。

包含单个序列的示例XML文件

在导出多个序列时，XML格式有一点不同：

包含多个序列的示例XML文件

15.1.1 导出代码

TeeChart提供了一个以XML格式导出序列数据的类。

这个类位于TeeStore.pas单元，它的名字是TSeriesDataXML

保存文件的例子：

Uses TeeStore;
with TSeriesDataXML.Create(Chart1, Series1) do
try
  SaveToFile('c:\sample.xml');
finally
  Free;
end;

如果您想要导出Chart1中的所有序列，请在Create构造函数的最后一个参数中传递传递“nil”，而不是Series1。

这个类还提供了一个函数来将XML输出转换成字符串：

var S : String;
with TSeriesDataXML.Create(Chart1, Series1) do
try
  S:=AsString;
finally
  Free;
end;

一些属性控制了要导出的数据类型，例如，如果包含/不包含point colors（点颜色）：

with TSeriesDataXML.Create(Chart1, Series1) do
try
  IncludeColors:=True;
  SaveToFile('c:\sample.xml');
finally
  Free;
end;

到目前为止，我们已经了解了如何生成包含TeeChart序列点的XML数据。

现在我们来做相反的工作，将这个XML导入到图表中。

15.2 XML数据导入

TeeChart Pro包含一个自动加载XML数据的组件。

该组件驻留在TeeXML.pas单元，类名是TTeeXMLSource。

图2，在Delphi工具栏中的TeeXMLSource组件。

加载XML图表所需的最少属性是“Chart（图表）”和“FileName（文件名）”。

图表属性指示在哪里(哪个图表)添加XML数据。文件名属性也可以是一个web地址(URL)。

Load方法开始将XML数据加载到图表序列中。

让我们创建一个新的应用程序，并终止一个Chart1组件和一个TeeXMLSource1组件。

uses Series;
procedure TForm1.FormCreate(Sender: TObject);
begin
  RegisterTeeStandardSeries; //确保“Line(线)”样式被加载。
  TeeXMLSource1.Chart:=Chart1;
  TeeXMLSource1.FileName:='http://www.steema.com/support/teechart/6/tutorials/xml/TeeChartSampleManySeries.xml';
  TeeXMLSource1.Load;
end;

注意:在上面的示例中，通过添加TeeChart工具栏或添加TeeGally单元到“Uses”引用中，调用RegisterTeeStandardSeries可以被省略。它只需要注册基本的图表样式(线、棒条、饼图等)，因此XML导入过程可以根据XML文件中找到的序列样式自动创建序列。

生成的图表：

从web URL加载远程XML文件也很简单：

procedure TForm1.FormCreate(Sender: TObject);
begin
  TeeXMLSource1.Chart:=Chart1;
  TeeXMLSource1.FileName:='http://www.steema.com/SampleData.xml';
  TeeXMLSource1.Load;
end;