[Gambas-user] dynamic created Menus

[Fabien Bodard]

I think the good way is this one :-)

Public Sub AddMenuFromOutsideForm(hMenu As Menu)
Dim hMenuItem As Object
Dim hParent As Object = Object.Parent(hMenu)

        hMenuItem = New Menu(hMenu)
        hMenuItem = New Menu(hMenu)
        Object.Attach(hMenuItem, hParent, "mnu_this_dont_work")
        hMenuItem.Text = "this don't work"
        hMenuItem = New Menu(hMenu)
        Object.Attach(hMenuItem, hParent, "mnu_this_dont_work")
        hMenuItem.Text = "this also don't work'"

End


First find the class that handle menus events with object.parent on
the given menu container.

then attach the new menu events to the same class instance with object.attach.

2017-02-06 15:08 GMT+01:00 Charlie Reinl <Karl.Reinl at ...9...>:
> Salut,
>
> how can I use dynamic created Menus, when they are made outside the
> Form.
> I expanded an example from Gianluigi to show what I want.
> The problem is, the Click event is not fired, if the menu is not created
> in the forms class.
>
>
>
> ------------------------------------------------------------------------------
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, SlashDot.org! http://sdm.link/slashdot
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>



-- 
Fabien Bodard