我的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.Minimum
和chart.BottomAxis.Maximum
属性来移动视图框。我会对 AVG 绘图感到满意,其中平均值的数量是图表上水平的像素数量。
我舍入了日期时间值
axisTimestamp := Trunc(timestamp * 40000) / 40000;
然后使用此值设置图表点。
如果存在具有这种 XValue 的点,那么我计算一个平均值:
if series.XValue[i] = axisTimestamp then
series.YValue[i] := (series.YValue[i] + newValue) / 2;