Code: Select all
MyCHart.Beginupdate
try
// Fill chart series here
finally
MyCHart.Endupdate
end
Code: Select all
// HH This allows for an enourmous optimization. Just call BeginUpdate before adding
// a lot of datapoints, and afterwards call EndUpdate
// All calculated series will be delayed until after adding all datapoints
procedure TCustomChart.BeginUpdate;
VAR i:integer;
begin
for i:=0 to SeriesList.Count-1 do
begin
SeriesList[i].BeginUpdate;
end;
end;
procedure TCustomChart.EndUpdate;
VAR i:integer;
begin
for i:=0 to SeriesList.Count-1 do
begin
SeriesList[i].EndUpdate;
end;
end;