PopUp Menü: Durch welchem Button geöffnet?

[simonko]

du weisst allen 9 buttons eine prozedur zu für das ereignis button.onclick und
dann kannst du nur Tbutton(Sender) schreiben und dann kannst du auf das element zugreifen.

[TeronG]

Zitat:

Zitat von simonko

du weisst allen 9 buttons eine prozedur zu für das ereignis button.onclick und ..

Wir sind aber bei Rechtsklick (glaubich ^^) und ich befürchte die dinger haben schon ein OnClick ereigniss ^^

[shmia]

Zitat:

Zitat von kurtm1

Also ich habe 9 Buttons, die allesamt das selbe PopUp Menü verwenden. Jetzt würde ich gerne herausbekommen, von/durch welchem/n Button das Menü aktiviert wurde.

Es gibt das Property PopupComponent !!

Delphi-Quellcode:

   ShowMessage((PopupMenue1.Popupcomponent as TButton).Caption);

[kurtm1]

ok ich habs inzwischen selbst zusammengebracht

Setze beim Ereignis OnContextPopUp des Buttons einen Index=Button.Tag und verwende dies dann später..

Zwar ein wenig umständlich aber es funzt


//EDIT: thx an shmia, das funzt und ist kurz

[TeronG]

Zitat:

Zitat von shmia

Es gibt das Property PopupComponent !!

:gruebel: Das wusst ich ned ... (OH Rules ^^)
Nagut dann kan man ja sogar wieder mit dem .Tag (Integer) arbeiten! :mrgreen:

Delphi-Quellcode:

ShowMessage(IntToStr((PopupMenu1.PopupComponent as TButton).Tag));

bzw.:

Delphi-Quellcode:

ShowMessage(IntToStr(PopupMenu1.PopupComponent.Tag));