ListView: wie Integer Zahl formatieren

[mkmk]

Ich möchte in einem ListView in der 1. Spalte eine Integer-Zahl im Format

Delphi-Quellcode:

-----
    0
    1
  :
  999
1.000

und rechtsbündig anzeigen.
Die Integer-Zahl direkt zu formattieren gelang mir nicht. Ich musste den Umweg über Integer->String->Float nehmen. Und um es noch rechtsbündig hinzukriegen, habe ich den Zeichensatz auf NewCourier umgestellt.

Delphi-Quellcode:

wert := StrToFloat(IntToStr(nIdx));
ListItem.Caption := Format('%6.0n', [wert]);

Dass das alles nicht das Gelbe vom Ei ist, merke sogar ich als Delphi-Laie. Nur: wie macht man das richtig ohne dieses Gewurschtel?

MfG

[RWarnecke]

Probiere es doch mal so :

Delphi-Quellcode:

Format('%d', [StrToInt(Edit1.text)]);

Und schau mal unter Format nach. Dazu noch die Spalte von der Listview auf rechtsbündig stellen.

[mkmk]

Das hatte ich schon ausprobiert.
Das '%d' gibt alles linksbündig und ohne Tausender-Trennung aus.

Das Help zu Format glaube ich auswendig zu können :)

Edit: "Dazu noch die Spalte von der Listview auf rechtsbündig stellen." ...
Tja, da waere ich um einen Tip sehr dankbar. Die ListView erstelle ich waerend der Laufzeit und diese Einstellung konnte ich nicht finden.

[Matze]

Hallo,

das geht ab der 2. Spalte so:

Delphi-Quellcode:

ListView1.Columns[1].Alignment := taRightJustify; // 2. Spalte

Grüße, Matze

[RWarnecke]

Lese die Ländereinstellungen aus und formatiere damit die Zahl.

Wie ist denn Dein ViewStyle vom ListView eingestellt ? Wenn der auf vsReport steht, dann kannst so rechtsbündig einstellen :

Delphi-Quellcode:

ListView1.Columns[3].Alignment := taRightJustify;

Edit: Den Befehl korrigiert.

[mkmk]

Muss zum Mittagessen. Werde es nachher gleich ausprobieren. Herzlichen Dank jetzt schon für die Tips

[Matze]

Hallo Rolf

Zitat:

Zitat von RWarnecke

Delphi-Quellcode:

ListView1.Columns[0].Aligment := taRightJustify;

Genau das funktioniert, abgesehen vom fehlenden "n", nicht. ;) Siehe dazu im MSDN:

Zitat:

[...] The alignment of the leftmost column is always left-justified; it cannot be changed. [...]

Grüße, Matze

[RWarnecke]

Zitat:

Zitat von Matze

Hallo Rolf

Zitat:

Zitat von RWarnecke

Delphi-Quellcode:

ListView1.Columns[0].Aligment := taRightJustify;

Genau das funktioniert, abgesehen vom fehlenden "n", nicht. ;) Siehe dazu im MSDN:

Zitat:

[...] The alignment of the leftmost column is always left-justified; it cannot be changed. [...]

Grüße, Matze

Danke Matze für den Hinweis, habe ich im Beitrag korrigiert.

[mkmk]

Schade, hatte mich schon gefreut gehabt.
D.h. also, dass mein Gewurschtel die einzige Lösung ist? Tja, auch ein blindes Huhn findet hin und wieder ein Korn. :D

Gibt es zumindest einen direkten Weg, wie man Integer in Double umwandelt, damit ich mir den Umweg über String ersparen kann?

[mkinzler]

Zitat:

Gibt es zumindest einen direkten Weg, wie man Integer in Double umwandelt, damit ich mir den Umweg über String ersparen kann?

Ja durch einfache Zuweisung:

Delphi-Quellcode:

<Floatvariable> := <Integervariable>;