HMENU zur laufzeit die Beschriftung herausbekommen

[lbccaleb]

Hallo Community,

Ich erzeuge zur Laufzeit ein PopUp-Menü dabei sind die einzelnen Einträge unterschiedlich, sprich, die Beschriftung ist anders! Wie kann ich nun anhand der Messages den Text herrausbekommen, mit welchem ich das Menü erzeugt habe?

Danke schon mal im vorraus...

[lbccaleb]

Sorry das ich Pushe, aber ich komm irgendwie nicht so recht weiter *grummel*

[mkinzler]

Non-VCL?

[lbccaleb]

ja, nonVCL

[SirThornberry]

Ich habe leider gerade kein Delphi zur Hand aber ich würde wie folgt vorgehen.
Ein Popupmenu nehmen und einen Eintrag anlegen. Dann per Quelltext die Caption abfragen (in etwa: PopupMenu1.Items[i].Caption) und dann nach der Declaration von Caption suchen (rechtsklick und entsprechenden Punkt im Menü auswählen oder Strg + Linke Maustaste auf Caption)

[mkinzler]

Das wäre dann aber VCL

[SirThornberry]

Nein, wäre es nicht. Das war eine beschreibung wie ich heraus finden würde wie es nonvcl geht. Denn im Source der VCL steckt mehr oder weniger tief vergraben der nonvcl aufruf. Und wenn man die Declaration sucht und dort schaut wie es in der VCL implementiert ist findet man eben den nonvcl-Aufruf :-)

[lbccaleb]

Ja, VCL weiß ich wie ich es machen würde...
Naja, ist für meinen MediaPlayer! Lade die Filter als PopUp-Menü, und wollte dann bei Click Sie weiterverarbeiten! Da ich aber nicht weiß, welcher Filter, welchem Menü zugeordnet wurde, brauche ich die Bezeichnung, denn beim laden wird die ja nach dem Filter benannt!

[SirThornberry]

wie gesagt sollst du es auch nicht mit der VCL machen sondern einfach in den VCL Sourcen schauen ;-) Da ich gerade kein Delphi zur Hand habe kann ich nicht selbst schauen und habe daher beschrieben wo/wie ich schauen würde.

[lbccaleb]

Also die VCL macht es über MenuItemInfo.dwTypeData

Damit hatte ich auch schon rumgespielt, naja aber irgendwie kommt da bei mir nicht vernünftiges bei raus ;-)

Delphi-Quellcode:

GetMenuItemInfo(hFilterPopUpMenue, loword(wParam), False, MenuItemInfo1)
//loword(wParam) = ID des Menüs

Hat denn jemand ne ahnung wieso die funktion fehlschlägt??