Falls es jemanden interessiert...
habs so gelöst:
ursprünglich wollte ich ja per
Column:=VST.FocusedColumn;
an den Index der jeweiligen Spalte kommen, was nur geht wenn der Text des Nodes fokussiert ist.
Jetzt komme ich so an den Index:
Delphi-Quellcode:
procedure TForm1.VSTClick(Sender: TObject);
var
HitInfo :THitInfo;
Pt: TPoint;
begin
Pt := VST.ScreenToClient(Mouse.CursorPos);
VST.GetHitTestInfoAt(Pt.X, Pt.Y, true, HitInfo);
Column := HitInfo.HitColumn;
Danke für die Hilfe!