[Gambas-user] gb.desktop.x11

[herberth guzman]

Hi Benoit

Thanks for your help for everything you've done with gb.desktop.X11.

No if lack of knowledge.
I'm a mistake, or do not know how.

Follow your instructions:

1 - Cls_Start

Static Public Sub X11Systray_Arrange()

   Dim I As Integer
   Dim X As Integer

   X = 2
   For I = 0 To X11Systray.Count - 1
     With X11Systray[I]
       .Move(X, 2, .IconH, .IconH)
       X += .IconW + 2

     End With
   Next

End

2 - Form_Panel DrawingArea in use and in the Form Load event

'Dim myPicture As New Image
'myPicture = Image.Load(User.home &/ "wifi.png")

MyDrawingArea.Cached = True
Draw.Begin(MyDrawingArea)
X11Systray.Show(MyDrawingArea.Handle)
'X11Systray.Refresh

'Draw.image(myPicture, 2, 2, 16, 16)
Draw.End()

I tested several ways and does not work.

No achievement see tray icons
and have access to the system tray.

If it is not too much to ask you to help me or orientes with an example
where I can see for example nm-applet and can access it please.

I'm lost (but also very happy for the component that you created)


Regards
Herberth Guzmán