Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi REAL 0.001 + 0.001 (https://www.delphipraxis.net/8069-real-0-001-0-001-a.html)

Pseudemys Nelsoni 28. Aug 2003 00:07


REAL 0.001 + 0.001
 
hoi,

dem topic nach müsste doch dann 0.002 rauskommen oder nicht? ich kriege immer den fehler "0.001 ist kein gültiger gleitkommawert"...ich muss per timer die Miliskunden anzeigen (also timer interval auf 1 und dann immer 0.001 hinzufügen) aber wieos geht das nicht?

Luckie 28. Aug 2003 00:31

Re: REAL 0.001 + 0.001
 
Was ist denn der DecimalSeparator auf deinem System? Punkt oder Komma?

Pseudemys Nelsoni 28. Aug 2003 00:36

Re: REAL 0.001 + 0.001
 
also in meinem delphibuch steht das es immer "." ist, wenn ich aber ne rechnung aufm zettel mache benutz ich schon komma.

aber jetzt wo du es gerade erwähnst... mit komma gehts, mit punkt nicht...tolles buch was ich da hb ~~

Pseudemys Nelsoni 28. Aug 2003 00:37

Re: REAL 0.001 + 0.001
 
hm..aber ich kann als globale variable nur " searchlen: REAL = 0.000;" nehmen statt mit komma...sonds gibts nen fehler das ";" erwartet wird, aber "," gefunden wurde... wie definier ich die sonst?

axelf98 28. Aug 2003 11:00

Re: REAL 0.001 + 0.001
 
Zitat:

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! :mrgreen:

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


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:26 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz