Thema: Delphi Tausenderpunkt einfügen

Einzelnen Beitrag anzeigen

Poring

Registriert seit: 7. Nov 2007
104 Beiträge
 
#1

Tausenderpunkt einfügen

  Alt 16. Feb 2008, 09:54
Hallo,

ich möchte gerne auf einem Label eine Zahl mit dem Tausenderpunkt ausgeben.
Versucht habe ich dies mit:

Delphi-Quellcode:
var
fs: TFormatSettings;
Zahl:=Real;
begin
fs.ThousandSeparator:='.';

Zahl:=28304;
Label1.Caption:=FloatToStr(Zahl, fs);
Auf dem Label wird die Zahl angezeigt, nur leider ohne den Tausenderpunkt.
Was könnte ich tun?

Mfg
  Mit Zitat antworten Zitat