Hallo Leute,
in D7 kann man TreeView.RightClickSelect auf TRUE setzen, ordnet der TreeView ein PopupMenu zu und schreibt einen Event-Handler für OnPopup():
Delphi-Quellcode:
procedure TDemoForm.TreeMenuPopup(Sender: TObject);
begin
with TreeView.ScreenToClient(Mouse.CursorPos) do
if not (htOnItem in TreeView.GetHitTestInfoAt(x, y)) then
Abort;
end;
Grüße vom marabu