Im Prinzip ist Dein Timer ja auch eine Schleife
Einmal gestarted feuert er nach Ablauf ein neues event ab
Wobei ein Timerkomponente mh.... GetTickCount währe da besser
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
//hier jetzt das Array füllen
if myzahler < hig(Myarry) then
begin
MyArray[myzahler]:= mydaten;
inc(myzahler);
end
else
myzahler:= 0;
end;
mal so auf die schnelle
Gruss alfold