TListView unter Vista größer als unter XP

[TUX_der_Pinguin]

In meinem Programm habe ich eine ListView Komponente hinzugefügt in diese Liste
werden eine Handvoll Einträge hinzugefügt (unterschiedliche Anzahl) da ich zur
Entwicklungzeit nicht weiß wie viele Einträge in der Liste stehen soll kann ich
nicht bestimmen wie groß die Komponente sein muß.

Zur laufzeit zähle ich die Einträge und stelle anhand der Anzahl die Höhe der
ListView Komponente ein.

Delphi-Quellcode:

ltvListe.Height := Count * 13

Unter Windows XP klappt das Prima die Komponete ist so groß das alle Einträge sichtbar
sind und kein Scrollbalken ist zu sehen, jedoch unter Vista reicht das nicht, da
taucht ein Scrollbalken auf.

Ich würde gern den Muliplikationsfaktor (13) durch etwas ersetzten was bei XP
klappt und auch bei Vista, aber ohne Betriebssystemweiche das wäre doch übertrieben.

Ich dachte schon das ich von einem Lable die Höhe nehme aber die bleibt wohl gleich.

[toms]

Hallo

So solltest du die ListView Itemhöhe berechnen können:

Delphi-Quellcode:

listview_list_item_height := LI.DisplayRect(drBounds).Bottom - LI.DisplayRect(drBounds).Top; 

(LI : TListItem)

[TUX_der_Pinguin]

Super es hat geklapt, vielen dank für den Tipp.