[Gambas-user] Menu has no Click() event
Demosthenes Koptsis
demosthenesk at ...626...
Mon Oct 3 18:38:46 CEST 2016
Yes it works also in Ubuntu Mate.
Final code:
----------------------
' Gambas class file
Public hMenu As Menu
Public hMenu2 As Menu
Public hMenu3 As Menu
Public Sub Form_Open()
TrayIcon1.PopupMenu = "hMenu"
TrayIcon1.Show
TrayIcon1.Visible = True
'Create the popup menu
hMenu = New Menu(Me, True) As "RootMenu"
hMenu2 = New Menu(hMenu) As "Menu2"
hMenu2.Text = "Mount ISO"
hMenu3 = New Menu(hMenu) As "Menu3"
hMenu3.Text = "Unmount ISO"
End
Public Sub TrayIcon1_Click()
hMenu.Popup
End
Public Sub Timer1_Timer()
If Me.Visible == True Then
Me.Visible = False
Endif
End
Public Sub Menu2_Click()
Message.Info("hello Menu2")
End
Public Sub Menu3_Click()
Message.Info("hello Menu3")
End
----------------------------
On 3/10/2016 19:18 μμ, Gianluigi wrote:
> Hello Charlie,
> It also works the message?
>
> 2016-10-03 15:55 GMT+02:00 Charlie <charlie at ...2793...>:
>
>> Your code works fine in Linux Mint 18 Cinnamon 64bit
>> http://www.cogier.com/gambas/TestG.png
>> <http://www.cogier.com/gambas/TestG.png>
>>
>>
>>
>> --
>> View this message in context: http://gambas.8142.n7.nabble.
>> com/Menu-has-no-Click-event-tp57442p57457.html
>> Sent from the gambas-user mailing list archive at Nabble.com.
>> ------------------------------------------------------------
>> ------------------
>> 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
>>
>>
>>
>> ------------------------------------------------------------------------------
>> 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
More information about the User
mailing list