Zitat:
Ich benötige eine Procedure die eine Kontrolle durchführt ob bereits seit dem Start des Timers, 100ms rumsind und wenn ja soll der Timmer wieder auf 0 gesetzt werden und wieder von vorne starten.
[mit dem sinn, nicht jede einzelne Berechnung zeichenen zulassen sondern jede 10ms, was ja sicher volkommen aureichend ist.]
Eventuell hab ich Dich da falsch verstanden, aber der Timer in delphi tut genau das, was Du vorhast:
Delphi-Quellcode:
var timer1: TTimer;
procedure TForm1.Initialisierung ();
begin
timer1.interval=10; //oder =100;
timer1.enabled= true;
end
procedure TForm1.Timer1_OnTimer(Sender: TObject);
begin
//zeichnung durchführen
end;
ob 10 ms bei Windows Sinn machen, weiß ich nicht genau, hab da die sinnvollen zeiten nicht im Kopf, würd aber gefühlsmäßig eher auf 100 ms hoch gehen
Viel Erfolg beim Forschen