Hi Redeemer
Ich hab mal noch einige Showmessages eingebaut. Das sieht dann so aus:
Zitat:
procedure TOpenFileFrame.TVFilesExplorerContextPopup
FPopUpPath := := P:\
FPopUpNode :=P:\ [Elements]
Zitat:
TOpenFileFrame.PopupMenu1Popup
Nur der Methodenrumpf verlangt noch ein klein wenig Hirnschmalz, um die korrekte Position des PopUps zu setzen:
Delphi-Quellcode:
procedure TOpenFileFrame.PopupMenu1Popup(Sender: TObject);
begin
ShowMessage('TOpenFileFrame.PopupMenu1Popup');
end;
Da werde ich wohl noch einige Felder einführen müssen...
Zitat:
Vielleicht, weil da die Mausposition gleich mit kommt.
Eher, weil das Event vom Treeview veröffentlicht wird - aber klar, dass da die Mouseposition dabei ist, macht die Sache scheinbar einfacher.
Gruss
Delbor