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

markieren

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.

markieren

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

Probiere es doch mal so :
Format('%d', [StrToInt(Edit1.text)]); Und schau mal unter Format nach. Dazu noch die Spalte von der Listview auf rechtsbündig stellen.

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.

Hallo,

das geht ab der 2. Spalte so:

ListView1.Columns[1].Alignment := taRightJustify; // 2. Spalte Grüße, Matze

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 :
ListView1.Columns[3].Alignment := taRightJustify; Edit: Den Befehl korrigiert.

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

Hallo Rolf

Zitat von RWarnecke:

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

Zitat von Matze:

Hallo Rolf

Zitat von RWarnecke:

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.

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.

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

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:
<Floatvariable> := <Integervariable>;