ich hab dir gerade oben eine Funktion hingeschrieben. Die geht auch. Aber ein Extended-Wert hat 10 Byte, da passen niemals 1920 Signifikante Stellen rein.
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;
wenn du z.B. Pi auf 10^20 Stellen genau berechnen willst, kommst du eben nicht drumrum einen neuen Typ zu schreiben oder so.