Einzelnen Beitrag anzeigen

st2000

Registriert seit: 23. Apr 2003
Ort: Hamburg
52 Beiträge
 
Delphi 5 Enterprise
 
#1

Auslöser TAction ermitteln, wobei TAction bei N Controls

  Alt 21. Aug 2003, 17:09
Hallo, weiss jemand, wie man in einem TAction.OnExecute - Eventhandler rausfinden kann, von welchem Control die TAction ausgelöst wurde ?

Sender ist TAction, aber das nützt nix, ich suche das Menuitem, welches die TAction zugewiesen bekommen hat.

Und TAction hat kein Auslöser-Komponenten-Attribut wie z.B. TPopUpMenu, wo es zumindest eine PopUpComponent gibt, die man sich mit RTTI vorknöpfen kann....

Hintergrund des Ganzen :

Es gibt ein TTreeNode. Wenn man da per Rechtsclick draufclickt, erscheint ein (in dem Moment dynamisch mit 3 TMenuItems befülltes) TPopUpMenu.
Jedes TMenuItem ist mit einem TAction verknüpft.

Nun will ich letztlich rausfinden, welcher TTreeNode mir das eingebrockt hat ...

Überlege schon, ob ich beim TMenuItem-Erzeugen einen Pointer auf den Node in den TAction-Tag ablege.
Aber kennt jemand was eleganteres ?
Muss doch schon mal vorgekommen sein.... Hab aber mit der Suche nix gefunden.

Bin für jeden Tip dankbar....
Stefan
Keine Softwarepatente ! Die Polen = wahre Freiheitskämpfer !!! Gerade noch rechtzeitig Mitglied geworden, um die Notbremse zu ziehen. Year !!!
  Mit Zitat antworten Zitat