Teechart图表应用技术详解—第三章之序列的维护（下）

TeeChart for .NET是优秀的工业4.0 WinForm图表控件，官方独家授权汉化，集功能全面、性能稳定、价格实惠等优势于一体。

---

点的删除

通过点的索引调用 Series.Deletel方法就可以删除一个点，点的索引从0开始。

Series1.Delete(0);                         //删除序列中的第一个点
Series1.Delete(Series1.Count -1);              //删除序列中的最后一个点

当试图删除一个不存在的点时，会产生下标越界错误： List out of bounds。因此，在删除

点时最好检查一下待删除点的索引是否有效，然后再进行删除操作，删除操作可迫使图表重新绘制。

if Series1.Count >MyIndex then Series1.Delete(MyIndex);

这行代码的作用就是在调用Delete方法以前先判断待删除点的索引是否在允许的范围之内。

序列中点查找与修改

一旦点增加到序列中，就可以査找它的坐标或对其进行修改。下面是使用 XValues和YValues的数组属性：

Var MyValue:Double;
MyValue:=Series1.YValues[o]；    //查找Y值的第一个点

也可以使用数组执行计算操作：

Var MyTotal:Double;
                   t:Integer;
MyTotal:=0
for t:=0 to Series.Count -1 do
MyTotal := MyTotal+Series1. YValues[t];
ShowMessage(FloatToStr(MyTotal));

扩展型序列也有附加的数组属性，如 TBubbleSeries的RadiusValues也可以采用访问XValues或YValues数组同样的方法进行访问：

if BubbleSeries1.RadiusValues[ Index ]>100 then

也可以使用以上属性修改点的值：

Series1.YValues[0]:=Series1.YValues[ =0]+1;
Series1.RefreshSeries;

序列中点的定位

XValues和YValues的Locate功能在列表中搜索指定的值，如果找到，返回值的索引，索引从0开始。

Var MyIndex : Integer;
My Index :=Series1. YValues Locate(123 );
if MyIndex =-1 then
   ShowMessage('在 series1序列中没找到123！')
else
  ShowMessage('123是序列 Series1中的第'+ IntToStr( MYIndex+1)+'个点！')；

点值的统计运算

XValues和 YValues属性提供下列统计项：

• Total：列表中值求和。

• TotalABS：列表中所有值的绝对值求和。

• Max Value：列表中的最大值。

• Min Value：列表中的最小值。

也可以调用 RecalcMinMax方法计算 MinValue、MaxValue、Total、TotalABS的值。

点的颜色

所有序列都有一个内部颜色表进行维护，这个颜色表对应着序列的每一个点。可以通过ValueColor数组属性查找、改变点的颜色。

Var MyColor : TColor;
Mycolor : =Series1. ValueColor[0];
Series1. ValueColor[1]:= clBlue;

Teechar定义了一个颜色常数clTeeColor.Delphi预定义了一些颜色常数，如 clBlue、clRed等。颜色也可以用RGB格式表示如RGB(255,0,0)。

点的标签

每个点有一个与之关联的文本，称作 XLabel，按 Delphi格式串声明，点的标签被用做轴的标签、图例和点标志，标签保存在序列的 XLabe属性的数组中，可以采用下列方法访问和修改点的标签：

Series1. XLabel[0]: = ' Sales';

运行期间序列类型的改变

每一个图表类型对应着不同的 Delphi组件。改变一个序列类型包括改变序列组件的类，这意味着必须创建一个新的序列对应的类，过去的序列属性被赋予新的实例，而且必须销毁过去的序列。当在设计阶段使用图表编辑器和图表风格对话框手动改变一个序列类型时这些都是自动发生的。通过下列方法可以在运行期间改变序列的类型：

Var MySeries : TChartSeries;
MySeries :=Series1;
ChangeSeriesTypeGallery(Self, MySeries);

下一节我们将会介绍第三章图表与序列的操作维护：函数的操作。如果有对Teechart图表感兴趣的朋友，可以多多关注本教程，并且欢迎在评论区留言。