TToolbutton Menü OnPopup

[ralfschwalbe]

Hallo,

ich habe auf einer Form eine ToolBar mit mehreren ToolButtons und einem PopupMenu. Einem ToolButton ist ein MenuItem (welcher mehrere MenuItems enthält) zugewiesen. Beim PopupMenu wird in OnPopup Code ausgeführt, der einige MenuItems enabled oder disabled. Beim Klick auf den ToolButton wird allerdings kein OnPopup aufgerufen (ist in ComCtrls bei TToolBar und TToolButton gar nicht vorgesehen)!

Gibt es einen Trick mit dem man OnPopup trotzdem aufrufen kann, wenn der entsprechende ToolButton geklickt wird?

[Diamondback2007]

Ruf das Popup doch einfach im Onclick per Hand auf mit .PopUp();

[ralfschwalbe]

Hab ich schon versucht... aber leider wird auch OnClick nicht aufgerufen, wenn dem ToolBotton ein MenuItem zugewiesen ist.

Hätte ich vorhin noch erwähnen sollen...

[ralfschwalbe]

Keiner eine Idee?

[marabu]

Moin Ralf,

entweder hat sich seit Delphi7 etwas geändert oder du selbst verhinderst den Aufruf deines event handlers für das Ereignis OnPopup(). Bei mir funktioniert alles wie es soll.

Freundliche Grüße

[ralfschwalbe]

Hi,

dann hat sich was geändert. Ich habe Delphi 2007. Dort steht auch in der ComCtrls.pas nichts mehr von OnPopUp...

Und da OnClick auch nicht ausgeführt wird, weiß ich nicht so recht weiter.

@marabu

Hinweis: Hast Du auch wirklich nur ein Menuitem (welches SubItems enthält!!!) zugewiesen und nicht das ganze Popupmenu?

[marabu]

Ich habe das PopupMenu an die Eigenschaft DropDownMenu des ToolButton. Beim Ereignis OnPopup() des PopupMenu wird mein dort hinterlegter Code ausgeführt.

[Kalfany]

Ich versteh nicht ganz was du haben willst, so wie im Anhang oder anders?

[edit]ah jetzt hab ichs kapiert , dann ist ja so wies im Anhang ist falsch[/edit]

[ralfschwalbe]

Ich erläutere nochmal...

Ich habe KEIN PopupMenü welches ich im Ganzen an die Eigenschaft Dropdownmenu hängen will.

Ich habe ein Popupmenü mit ca. 10 Items. 3 davon haben nochmal Subitems. Ich möchte nun einen Eintrag (MenuItem des PopupMenus) mit den Subitems der Eigenschaft MenuItem des Toolbuttons zuweisen. Das funktioniert auch, es wird ein Menü angezeigt, welches NUR die SubItems des einzelnen MenuItems anzeigt. Aber genau dann wird KEIN OnPopup aufgerufen.

Ganz schön verzwickt, oder?

[marabu]

Entschuldige Ralf, ich habe deine Problembeschreibung zu oberflächlich gelesen.

Ich habe jetzt der Eigenschaft MenuItem des ToolButton ein Submenu zugewiesen. Beim Anklicken des ToolButton wird mein Code für das Ereignis OnClick() des Submenus ausgeführt.

Das müsste doch für deine Zwecke ausreichend sein, oder?

Freundliche Grüße