Tausendertrennzeichen

[Adenos]

in meinem Programm kommen gigantische Zahlen vor, die kaum jemand erkennen kann. Wie kann ich sie möglichst einfach mit Tausendertrennzeichen darstellen?

[fliegermichl]

z.B. mit FloatToStrF(100000000000000.0, ffCurrency, 10, 2);

[wp_xyz]

Code: Alles auswählen

program Demo;
uses
  SysUtils;
var
  x: Double;
begin
  x := 1.23E7;
  WriteLn(Format('%.3n', [x]));
  WriteLn(FormatFloat('#,##0.000', x));
  
  ReadLn;
end.  

Aber Achtung: Beim Zurückumwandeln eines Strings mit Tausender-Trennzeichen in einen Float unbedingt diese vorher aus dem String entfernen, weil keine von den in Lazarus/FPC vorhandenen Konvertierungsroutinen diese berücksichtigt.

[Adenos]

was bedeutet bitte das Zeichen "n" in WriteLn(Format('%.3n', [x]));

[six1]

https://wiki.freepascal.org/Format_function

n Number (floating)

[Adenos]

ich glaube, ich habe es schon rausgefunden. n ist die Anzahl der Nachkommastellen.

[fliegermichl]

ich glaube, ich habe es schon rausgefunden. n ist die Anzahl der Nachkommastellen.

Nein die 3 vor dem Punkt ist die Anzahl Nachkommastellen.

Edit: Ich meine natürlich die 3 nach dem Punkt

[wp_xyz]

https://www.freepascal.org/docs-html/rt ... ormat.html