sonst musst du es eben selber schreiben...
Delphi-Quellcode:
function floattostr(x:extended;kommastellen:integer):string;
var
b:extended;
i:integer;
begin
b:=x;
if b<0 then begin
b:=-b;
result:='-';
end else
result:='';
result:=result+inttostr(trunc(b))+',';
b:=b-trunc(b);
for i:=1 to kommastellen do begin
b:=b*10;
result:=result+inttostr(trunc(b));
b:=b-trunc(b);
end;
end;
(getestet+funktioniert)
für große Zahlen natürlich unbrauchbar, da die Funktion keine Schreibweise "17,793479823789e18" hinkriegt.