Popupmenu for menuitem?

[SpaceGit]

Is it possible to have a popupmenu for a menuitem when it is right-clicked?
Preferably crossplatform, but failing that I will settle for windows support
Thank you in advance for any and all suggestions

[Remy Lebeau]

Is it possible to have a popupmenu for a menuitem when it is right-clicked?
Preferably crossplatform, but failing that I will settle for windows support

It is possible on Windows, yes. Whether or not the LCL natively supports this, I don't know.

In Win32 API terms, you need to handle the WM_MENURBUTTONUP message that is sent to the 1st menu's owner window, and then display the 2nd popup menu using TrackPopupMenuEx() with the TPM_RECURSE flag specified.

[jamie]

In order to capture that message the form's message handler needs to be hookee.

Overriding the wndproc wont cut it because the lcl blocks it
I wrote a class that makes it easy to force the form class to pass all desired messages so they can be handled normally.

  I posted it here at one time "ezmessages"

[jamie]

I attached a project that uses my msghook i wrote with some code examples of device detection, form moving etc

[jamie]

I wanted to let you know that I tried the WM_MENURBUTTONUP message,

Code: Pascal  [Select][+][-]

1. Procedure TForm1.WmMenuRButtonUp(var Msg:TMessage);
2. Begin
3.   TrackPopUpMenuEx(PopUpMenu1.Handle,TPM_RECURSE,Mouse.cursorpos.x,mouse.cursorpos.y,Handle,nil);
4. End;                                                                                              
5.  

and it does work, just add the message to the msghook and implement the message handler normally.

[SpaceGit]

Thank you Jamie And the rest of yous