Zahl hochzählen

[Mark Halter]

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

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