Großen Float-Wert ohne Exponent darstellen?

[Dejan Vu]

Ich habe gerade kein Delphi, aber klappt "#,0" als Formatierungsparameter nicht?
Und wenn das nicht geht, vielleicht eine eigene kleine Routine?

Delphi-Quellcode:

Function ExtendedToString(v : Extended; ThousandSeparator : Char) : String;
var
  i,d : Integer;

Begin
  result :='';
  i:=0;
  while v>0.01 do begin
    d := Int(0.5+frac(v/10)*10);
    v := Trunc(v/10);
    Result := IntToStr(d)+Result;
    inc(i);
    if i mod 3=2 then 
      Result := ThousandsSeparator+Result;
  end;
end;

Ungetestet.
'Int' soll den Nachkommaanteil abschnippeln und einen Integer liefern.
'Frac' soll nur den Nachkommaanteil liefern
'Trunc' soll den Nachkommaanteil abschnippeln und einen Extended liefern.