Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Tausenderseparator für Integerzahlen (https://www.delphipraxis.net/118648-tausenderseparator-fuer-integerzahlen.html)

taaktaak 12. Aug 2008 09:18


Tausenderseparator für Integerzahlen
 
Moin, Moin.
Mit der Format()-Funktion stehe ich leider immer noch auf Kriegsfuß :|
Ich benötige in der Anzeige größerer Integerwerte in der Statusbar den Tausenderseparator. Mit Format() kann man die nur in Floatwerte einfügen!? Übersehe ich da was, oder muss man da tatsächlich selber etwas basteln?

mkinzler 12. Aug 2008 09:20

Re: Tausenderseparator für Integerzahlen
 
Dann übergebe den Integer doch als Float

taaktaak 12. Aug 2008 09:39

Re: Tausenderseparator für Integerzahlen
 
Hmmm, ja, das funktioniert natürlich.

Delphi-Quellcode:
procedure UpdateStatusBar(Count:Integer);
var s : Single;
begin
  s:=Count;
  sBar.Panels[0].Text:=Format('%1.0n',[s])
end;
Die Verwendung der temporären Variable finde ich irgendwie blöd. Mit
Delphi-Quellcode:
Format('%1.0n',[Single(Count)])
meckert aber der Compiler "ungültige Typumwandlung" ??

mkinzler 12. Aug 2008 09:42

Re: Tausenderseparator für Integerzahlen
 
Versuch mal
Delphi-Quellcode:
Format('%1.0n',[(Count/1)]);

taaktaak 12. Aug 2008 09:44

Re: Tausenderseparator für Integerzahlen
 
Ahhhh, guter Trick, das Ergebnis ist ein Float - Danke :hi:


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz