The answer was INITMENUPOPUP instead of INITMENU.
Staffan
On Tue, Jul 8, 2014 at 4:19 PM, Staffan Tylen <staffan.ty...@gmail.com>
wrote:
> I'm struggling trying to convert the handle that is passed to an event
> handler into a resource ID. I've got something like this in place:
>
> menubar = .BinaryMenubar~new
> popup = .Popupmenu~new(100)
> menubar~insertpopup(1,101,popup,"File",,,.true)
>
> menubar~attachTo(self)
> menubar~connectMenuEvent(onInitMenu,"INITMENU")
>
> ::method onInitMenu unguarded
> use arg hmenu
>
> I've tried various things to convert hmenu to a resource ID so that I can
> take action when the ID is 100 in this case, i.e. when the user presses
> "File" on the menu bar. But nothing seems to work. Examples:
>
> a = menuBar~getPopup(100)
> id = a~getHandle
> if id = hmenu then say "You pressed 'File'"
>
> This doesn't get a match.
>
> a = menuBar~getPopup(100)
> id = a~getControlID(hmenu)
>
> This causes a rexx environment crash.
>
> id = menubar~getControlID(hmenu)
>
> This causes a rexx environment crash.
>
> id = self~getControlID(hmenu)
>
> This returns -1, meaning hmenu is not a valid handle.
>
> So what's the secret please? (I've checked but haven't found any example
> code.)
>
> Staffan
>
>
>
>
------------------------------------------------------------------------------
Open source business process management suite built on Java and Eclipse
Turn processes into business applications with Bonita BPM Community Edition
Quickly connect people, data, and systems into organized workflows
Winner of BOSSIE, CODIE, OW2 and Gartner awards
http://p.sf.net/sfu/Bonitasoft
_______________________________________________
Oorexx-users mailing list
Oorexx-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-users
