[Gambas-user] gb.desktop.x11

Benoît Minisini gambas at ...1...
Tue Jun 3 23:02:36 CEST 2014


Le 03/06/2014 22:24, herberth guzman a écrit :
> 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

See the new example in revision #6301.

Regards,

-- 
Benoît Minisini




More information about the User mailing list