Thema: Delphi REAL 0.001 + 0.001

Einzelnen Beitrag anzeigen

axelf98

Registriert seit: 27. Aug 2003
Ort: Ennepetal
440 Beiträge
 
Delphi 2005 Personal
 
#5

Re: REAL 0.001 + 0.001

  Alt 28. Aug 2003, 12:00
Zitat von silent:
Ich muss per timer die Miliskunden anzeigen (also timer interval auf 1 und dann immer 0.001 hinzufügen) aber wieos geht das nicht?
hmm.. Bei mir geht das:

Delphi-Quellcode:
var
  X : real;
//.................

 // vorher sollte natürlich x := 0 gestetzt werden!

procedure TForm1.Timer1Timer(Sender: TObject);
begin
x := x + 0.001;
label1.Caption := floattostr(x);
end;
Aber dann braucht der 10 Sekunden um bei der ersten Sekunde anzukommen...
Etwas langsam finde ich!

Wenn man den Timer auf 23 stellt und dann immer um 0.023 erhöht kommt am ende fast ne Sekunde raus!
  Mit Zitat antworten Zitat