Wie groß sind die Items in einem VCL-ListView

[Der schöne Günther]

Ich habe einen TListView mit ViewStyle = vsReport . Ich gebe dem ListView noch Bildchen für die Items mit SmallImages = myFancyImageList .

Woher weiß ich wie hoch ein ListItem ist? Ich möchte meinen TListView nur so hoch machen, dass genau alle Items reinpassen.

Wenn die Images drastisch größer als die Schriftart sind scheint die Formel zu sein:
totalHeightPx := ListView.Items.Count * (ListView.SmallImages.Height+2) - 1;

Gibt es etwas besseres am ListView das ich abfragen könnte?

Im Anhang nochmal als Bild: Ich möchte den überflüssigen Bereich da unten weghaben.