Hi,

normalerweise kann ich mit folgendem Code eine Zahl hochzählen.

markieren

Code:

  Edit1.Text := '0';
  Edit1.Text := IntToStr(StrToInt(Edit1.Text) +1);

Wie wandle ich das aber in Real um? Der Integer und auch der Int64 reichen mir nicht. Ich brauche also Real, o. ä.
Vielen Dank.

markieren

Code:

Edit1.Text := FloatToStr(StrToFloat(Edit1.Text) +1);

Hi,

es geht, aber es ist noch nciht so ganz wie ich es wollte, denn die Zahlen werden mit xxExx angezeigt, ich hätte sie aber gerne ausgeschrieben. Ist das machbar?

Fließkommazahlen sind leider nicht genau genug. Du musst Dich wohl mit Int64 begnügen. Mehr geht mit den Pascal Standards leider nicht.

oki, trotzdem danke.
Ich wollte ein Edit das von 5px bis ca. 20cm lang ist, füllen.
Irgendwo gibt es halt doch noch grenzen.

Hi,

wie wäre es denn mit

markieren

Code:

var
  f : Extended;
begin
  f := 180.0000000000015;
  Edit1.Text := FormatFloat('0.000000000000000000000', F);
end;

Damit wird die Zahl ausgeschrieben und zwar mit soviel stellen, wie du Nullen nach dem Dezimalpunkt angibst.

Grüße

Mark
Syntax by FuckRacism

Ich baruche aber ganze Zahlen und keine Kommastellen.
Trotzdem Danke.

Na, dann lass halt die Nullen und den Punkt weg:

markieren

Code:

var
  f : Extended;
begin
  f := 1800000000000015;
  Edit2.Text := FloatToStr(f); // -> 1,80000000000002E15
 Edit1.Text := FormatFloat('0', F+1);// -> 1800000000000016

Grüße

Mark
Syntax by FuckRacism