Doch, OnDblClick geht.
Delphi-Quellcode:
procedure TForm1.TreeView1DblClick(Sender: TObject);
var Item: TTreeNode;
P: TPoint;
begin
//Maus- in Clientkoordinaten umrechnen
P := Treeview1.ScreenToClient(Mouse.CursorPos);
//Knoten an dieser Stelle ermitteln
Item := Treeview1.GetNodeAt(P.X, P.Y);
//wenn einer da -> ausgeben
if Assigned(Item) then
ShowMessage(Item.Text);
end;
Hm das Problem daran ist, das nur auf einen Doppelclick direkt auf den Text die Funktion auslösen darf, mach ich das so wie du hier geschrieben hast, dann reagiert die Funktion auch auf DoppelClicks auf den erweitern/verstecken Pfeil. Ich müsste es irgendwie hinkriegen das nur auf einen Doppelklick genau auf den Text die Funktion weiterläuft