Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#2

Re: Timer zählt +2 anstatt +1???

  Alt 2. Jul 2007, 19:12
Du darfst nicht die Zeit mit einem Timer aufaddieren, denn die Timerungenauigkeiten addieren sich im Laufe der Zeit zu grossen Beträgen. (5 Min pro Stunde gut möglich)
Besser Startzeit merken und die Differenz anzeigen:
Delphi-Quellcode:
var
   StartZeit : TDateTime; // am Besten im private-Abschnitt der Klasse TForm1 ablegen
...
   StartZeit := Now;
end;
...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
   form2.edit3.text := TimeToStr(Now- Startzeit);
end;
Das Timer-Interval hat so keinen Einfluss auf die Genauigkeit der Anzeige.
Bei Timer-Interval von 5000 wird die Anzeige halt nur alle 5s aktualisiert.
Andreas
  Mit Zitat antworten Zitat