So gehts:
Delphi-Quellcode:
procedure Form1.VTISTMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
myHit: THitInfo;
begin
VTIST.GetHitTestInfoAt(x,y,true,myHit);
if hiOnitem in myHit.HitPositions then
begin
mySelNode:=myHit.HitNode;
if Assigned(mySelNode) then
mySelData:=VTIST.GetNodeData(mySelNode);
end;
end;
Dann deklarierst Du noch (am besten public):
Delphi-Quellcode:
mySelNode: PVirtualNode;
mySelData: PIrgendwas (also Deinen Datentyp)
Und in mySelData stehen dann Deine Daten, die Du dann z.B. im OnClick des VST auswerten kannst.
Gruß Igotcha