Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Zahlen mit Format ausgeben (https://www.delphipraxis.net/11117-zahlen-mit-format-ausgeben.html)

phlux 31. Okt 2003 12:12


Zahlen mit Format ausgeben
 
Servus :hi:
Ich möchte ein paar Größen in KB in Delphi ausgeben, allerdings in folgendem Format "2.024.465 KB".
Ist das mit einem Formatstring möglich?

mfg phluphie :hi:

Luckie 31. Okt 2003 12:28

Re: Zahlen mit Format ausgeben
 
Format -> F1

Christian Seehase 31. Okt 2003 12:30

Re: Zahlen mit Format ausgeben
 
Moin Phlux,

probier's mal so:

Delphi-Quellcode:
var
  eKiloByte : Extended;
  iKiloByte : integer;

begin
  iKiloByte := 2024465;
  eKiloByte := iKiloByte;
  ShowMessage(Format('%.0n KB',[eKilobyte]));
end;
Leider braucht n einen Floatingpoint Parameter, deshalb die beiden Angaben.

phlux 31. Okt 2003 12:47

Re: Zahlen mit Format ausgeben
 
Zitat:

Zitat von Luckie
Format -> F1

Wow danke luckie, durch deinen Tipp haben sich alle meine Probleme gelöst. Mal eine Gegenfrage, denkst du nicht das ich _ZUERST_ in die OH geguckt habe _BEVOR_ ich hier die Frage gepostet habe? Also bitte ich dich, solche sinnlosen Posts in meinen Threads zu unterlassen.
P.S: Ich komm sehr wohl mit Format klar, und sind mir auch die Formatstrings bekannt, nur hab ich nicht den passenden String gefunden.

@Christian: Danke das war der Tipp den ich brauchte ;) :thumb:

mfg phlux

Gollum 31. Okt 2003 13:02

Re: Zahlen mit Format ausgeben
 
Hallo,

so geht's auch:

Delphi-Quellcode:
var
  iKiloByte : integer;

begin
  iKiloByte := 2024465;
  ShowMessage(FormatFloat('#,#0 Byte', iKiloByte));
end;

Luckie 31. Okt 2003 13:10

Re: Zahlen mit Format ausgeben
 
Zitat:

Zitat von phlux
P.S: Ich komm sehr wohl mit Format klar, und sind mir auch die Formatstrings bekannt, nur hab ich nicht den passenden String gefunden.

Und warum sagst du das nicht? :evil: In etwa so: "Welchen Formatbeschreiber muss ich wie benutzten um folgende Ausgabe 2.125.123.,25 zu bekommen?" Und sei froh, dass ich so geantwortet haben. Wäre ich schlecht drauf, dann hätte ich nur mit "ja" geantwortet, weil was anderes wolltest du ja nicht wissen.

Btw. wie soll ich glauben, dass du die Hilfe gelesen hast, wenn ich da so etwas bei mir finde:
Zitat:

n
Number. The argument must be a floating-point value. The value is converted to a string of the form "-d,ddd,ddd.ddd...". The "n" format corresponds to the "f" format, except that the resulting string contains thousand separators.

phlux 31. Okt 2003 13:17

Re: Zahlen mit Format ausgeben
 
Oki, dann das nächste mal so :thuimb: werde mich bemühen meine Fragen demnächst Luckie-Konform zu stellen. Liegt vielleicht auch einfach nur daran, das ich grad 2 Stunden Mathe-Vorlesung hatte ( :thumb: :kotz: )

mfg phlux

Edit: Ich habe auch die Hilfe gelesen, aber schon mal davon gehört das man auch bei zweimaligem Lesen etwas überlesen kann? ;)

Luckie 31. Okt 2003 13:21

Re: Zahlen mit Format ausgeben
 
Sorry, ich bin etwas überspannt im Moment. Lag auch an mir, dass das so gekommen ist. Entschuldige noch mal bitte.

phlux 31. Okt 2003 13:25

Re: Zahlen mit Format ausgeben
 
Alles klar, lag wohl auch bei mir einfach daran das im moment mein geistiger Stack randvoll war, bitte verzeihe mir meinen aggressiven Post.

:cheers: ?

Luckie 31. Okt 2003 13:32

Re: Zahlen mit Format ausgeben
 
:cheers:


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:43 Uhr.

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