Tchart 动态添加节点

最新推荐文章于 2021-09-17 17:07:14 发布

原创最新推荐文章于 2021-09-17 17:07:14 发布 · 2.9k 阅读

1 ·

CC 4.0 BY-SA版权

Delphi 专栏收录该内容

19 篇文章

订阅专栏

本文介绍如何使用 Delphi 动态添加图表系列及如何为图表系列添加带有标签和颜色的数据点。此外，还提供了根据节点数量动态调整图表系列的方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

动态添加节点

Chart1.AddSeries( TFastLineSeries.Create( self ) );

添加节点坐标值

Chart1.Series[0].AddXY(X,Y,Label,color); Chart1曲线0 坐标X Y处添加点

第一条曲线是 Series[0].

第二条曲线是 Series[1]. 依此类推

function AddXY(Const AXValue, AYValue: Double; Const ALabel: String; AColor: TColor): Integer; virtual;
Description
This function inserts a new point in the Series.
The new point has X and Y values.

The ALabel parameter is optional (can be empty '').
The AColor parameter is optional (can be clTeeColor).
The function returns the new point position in the Values list.

Series1.AddXY( 123, 456, 'Hello', clGreen );

==============================================

if NodeNum > Chart1.SeriesCount   then //如果收到的节点地址大于曲线数目增加曲线
      begin
         for i:=Chart1.SeriesCount+1 to NodeNum   do
          begin
             Chart1.AddSeries( TFastLineSeries.Create( self ) );
             //TFastLineSeries.Create( self ).LinePen.Width:=2;       //OText.Add:='节点'+ IntToStr(i)+'温度';
             Chart1.Series[i-1].Title:='Node '+IntToStr(i)+'温度';

end
end ;