Hallo,
warum so kompliziert,
nimm einen TListView, da musst du gar nichts machen.
Delphi-Quellcode:
ListItem:= ListView.Items.Add;
ListItem.Caption:= 'Spalte 1';
ListItem.SubItems.Add('Spalte2');
Update:
Habe gerade "Bildchen zeichnen" gelesen
-> TVirtualTreeView, auch wenn der Anfang etwas kompliziert ist,
aber dafür gibt es Tutorials (Such-Funktion)
Heiko