Tchart и делфи как реализовать двигающийся график?

[dandandan]

Стоит задача вывести на график 100 точек. Затем при получении 101-ой точки, первую спрятать с экрана. График сдвинуть влево (99 точек) и добавить к нему 101. Так повторять до бесконечности.

Как такое сделать? Т.е. нужно получить бегущий график.
График сейчас вывожу так:

  for i:=0 to 220000 do
  begin
    Series1.AddY(10*sin(i*0.29),'',clBlack);
    application.ProcessMessages;
    if stop=1
    then break;
   end;

 

[diavolic]

SetInternalCanvas, ну а потом канвас копированием сдвигать на точку влево.

кстати, вот бесконечный цикл:
i:=0;
while true do
begin
// какие то действия
inc(i);
end

 

[oleh1234]

можна сделать через Timer