Thema: Delphi Zahl hochzählen

Einzelnen Beitrag anzeigen

Mark Halter

Registriert seit: 30. Jun 2002
2 Beiträge
 
#8
  Alt 1. Jul 2002, 21:38
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
  Mit Zitat antworten Zitat