减少抽取的 TChart 点数



我的TChart有很多series.AddXY方法添加的点。每秒添加一个点(但也可能有很长时间没有数据(。更改图表(添加点(后,当我转到带有图表的选项卡时,大约需要 5 秒才能重新绘制。

我认为使用聚合函数将有助于更快地绘制图表:

ser1: TFastLineSeries;
ser2: TPointSeries;
ser3: TFastLineSeries;
utc: TDateTime;
ser1.SetFunction(TAverageTeeFunction.Create(Self));
ser1.FunctionType.Period := 100;
ser1.FunctionType.PeriodStyle := psRange;
ser2.SetFunction(TAverageTeeFunction.Create(Self));
ser2.FunctionType.Period := 100;
ser2.FunctionType.PeriodStyle := psRange;
ser3.SetFunction(TAverageTeeFunction.Create(Self));
ser3.FunctionType.Period := 100;
ser3.FunctionType.PeriodStyle := psRange;
for i := 0 to 30000 do begin
.....
ser1.AddXY(utc, 0, utcStr);
ser2.AddXY(utc, deviation, utcStr);
ser3.AddXY(utc, trend, utcStr);
.....
end;

但它和以前一样慢。

如何更快地绘制图表?

更新

这是 3 小时数据的不可缩放图表。"现在"在右边缘,"-3h"在左边缘。点不断到达右侧并从左侧删除。通过设置chart.BottomAxis.Minimumchart.BottomAxis.Maximum属性来移动视图框。我会对 AVG 绘图感到满意,其中平均值的数量是图表上水平的像素数量。

我舍入了日期时间值

axisTimestamp := Trunc(timestamp * 40000) / 40000;

然后使用此值设置图表点。

如果存在具有这种 XValue 的点,那么我计算一个平均值:

if series.XValue[i] = axisTimestamp then
series.YValue[i] := (series.YValue[i] + newValue) / 2;

相关内容

  • 没有找到相关文章

最新更新