PureBasic Forums - English

http://www.purebasic.com
https://www.purebasic.fr/english/

How to use program icon for tray icon?

https://www.purebasic.fr/english/viewtopic.php?t=51000

Page 1 of 1

How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 10:21 am
by sartic
i prefer win & lnx solution

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 12:33 pm
by IdeasVacuum
AddSysTrayIcon()

For Windows and Linux to be the same solution, you need to use a png of the icon (16 x 16pix).

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 1:55 pm
by sartic
IdeasVacuum wrote:AddSysTrayIcon()

For Windows and Linux to be the same solution, you need to use a png of the icon (16 x 16pix).
i know that.
i add program icon to pb code
pb adds compiled exe this icon
i want to use _that_ icon for tray icon

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 2:19 pm
by IdeasVacuum
i want to use _that_ icon for tray icon
.... that is what AddSysTrayIcon() does:

AddSysTrayIcon(#TrayIcon, WindowID(#MyWin), ImageID(MyIconImage))

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 3:22 pm
by IdeasVacuum
Here is a working example:

Code: Select all

UsePNGImageDecoder()

Enumeration
#MyIcon
#TrayIcon
#TrayIconImage
#Win
#BtnToTray
#BtnExit
EndEnumeration

DataSection
  MyTrayIcon:
  Data.q $0A1A0A0D474E5089,$524448490D000000,$1000000010000000,$6891900000000208,$5948700900000036
  Data.q $0E0000C40E000073,$00001B0E2B9501C4,$DC07454D49740700,$8E4BEA23190D1308,$584574070000007D
  Data.q $00726F6874754174,$0C00000048CCAEA9,$6373654474584574,$006E6F6974706972,$0A00000023210913
  Data.q $79706F4374584574,$0FAC007468676972,$45740E0000003ACC,$6974616572437458,$00656D6974206E6F
  Data.q $09000000090FF735,$74666F5374584574,$FF705D0065726177,$5845740B0000003A,$69616C6373694474
  Data.q $8FB4C0B70072656D,$7458457408000000,$00676E696E726157,$0700000087E61BC0,$72756F5374584574
  Data.q $00EB83FFF5006563,$4374584574080000,$F600746E656D6D6F,$7406000000BF96CC,$656C746954745845
  Data.q $00000027D2EEA800,$D5912854414449A8,$F0051441810ACFD2,$52A5858D83BC27DF,$E5608F24958E3C6C
  Data.q $AD958A4B59107895,$9FCBE61316310592,$F739DCD35BA74B3E,$1CA1BF059BA77B9C,$73810C876A01798F
  Data.q $8D125C3A2123ED31,$C965D3A85CB60B06,$026D047029235C02,$1199EEF44A150181,$3373FF5BE21C3FD8
  Data.q $3ABC4BC3718F0E43,$537F13F0362A51A4,$A533581FD25F6DF0,$4E79563326805715,$B273CE38A77932EE
  Data.q $5139926A86C77DD4,$C3BEED6FB26496A7,$C1680C883F32360D,$4E454900000000E1,$000000826042AE44
EndDataSection


 CatchImage(#MyIcon,?MyTrayIcon)
CreateImage(#TrayIconImage,16,16,24)

    If StartDrawing(ImageOutput(#TrayIconImage))
             
          DrawingMode(#PB_2DDrawing_Default)
            DrawImage(ImageID(#MyIcon),0,0)
          StopDrawing()
    EndIf

Procedure ShowWin()
;------------------

      If OpenWindow(#Win, 0, 0, 300, 200, "Tray Icon", #PB_Window_SystemMenu|#PB_Window_SizeGadget|#PB_Window_MinimizeGadget|#PB_Window_TitleBar|#PB_Window_ScreenCentered)

               ButtonGadget(#BtnToTray,  10, 100, 280, 25, "Minimise to Sys Tray")
               ButtonGadget(#BtnExit,    10, 150, 280, 25, "EXIT")

      EndIf

EndProcedure


Procedure WaitForUser()
;----------------------

iEvent.i = 0
iGdgID.i = 0
   iOK.i = #False

           Repeat
                         iEvent = WaitWindowEvent(1)
                  Select iEvent

                         
                          Case #PB_Event_SysTray

                          If(EventGadget() = #TrayIcon) : HideWindow(#Win,#False) : EndIf

                          Case #PB_Event_Gadget

                                     iGdgID = EventGadget()
                              Select iGdgID

                                         Case #BtnToTray

                                              AddSysTrayIcon(#TrayIcon, WindowID(#Win),ImageID(#TrayIconImage))
                                          SysTrayIconToolTip(#TrayIcon, "Tray Icon Example")
                                                  HideWindow(#Win, #True)

                                         Case #BtnExit: iEvent = #PB_Event_CloseWindow


                              EndSelect
                  EndSelect

           Until iEvent = #PB_Event_CloseWindow

EndProcedure

ShowWin()
WaitForUser()

End
The icon is a red box with a black 'T'

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 3:46 pm
by ts-soft
Working example for windows and linux:

Code: Select all

Enumeration ; images
  #Img_Main
EndEnumeration

CompilerSelect #PB_Compiler_OS
  CompilerCase #PB_OS_Windows
    CatchImage(#Img_Main, ?icon_ico_start)
    DataSection
      icon_ico_start:
      ; size : 4286 bytes
      Data.q $2020000100010000,$10A8002000010000,$0028000000160000,$0040000000200000,$0000002000010000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$00000B0000000000,$0000000000000B00,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000250000000800,$00008A0000005400,$0000340000008600
      Data.q $0000000000000200,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000040000000000,$0000440000001900,$2A20BB1702007B00,$0705FFB72D23ED90
      Data.q $0000AF000000ED15,$0000030000004000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000100000000100,$0000690000003500,$483EDF6A1C12A600,$6469FFFF5F5CFFDE
      Data.q $382AFED34E4DFFEC,$0000F2260D0AFFEA,$00004A000000B800,$0000000000000600,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000280000000A00,$100A930000005800,$5F54F7BB3D31D045,$5B5BFFF06060FFFF
      Data.q $5C5DFFDA595BFFE1,$575AFFE0646AFFDA,$1510FFE73527FFD2,$0000C0000000F43F,$0000090000005300
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000040000000000,$0000470000001D00,$2E24BF1E05027F00,$6058FFFF594CEE98,$5B55FFED5E57FFFE
      Data.q $595AFDDF5A58FFE0,$5E62FDDB5C5CFFDC,$6A73FDDC6366FFDB,$3427FDD7636AFFE1,$0000F75A1C15FFE1
      Data.q $000060000000C900,$0000000000000E00,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000100000000000,$00006E0000003800,$4E3FE374221AAC00,$5D52FFFF6152FFF2,$5A51FFE8594FFFF4
      Data.q $5C56FFE25B54FFE3,$5B5AFFE05C59FFE2,$6265FFDC5D5EFFDD,$6B76FFE1656AFFDE,$7883FFE87583FFE2
      Data.q $251BFFD84236FFD6,$0000A1000000F67A,$0000000000003000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$150F410000000100,$604DFBD14234CF50,$584AFFFF5D4DFFFF,$594CFDE7564AFFF0
      Data.q $5C54FDE7594FFFE6,$5C56FDE55D56FFE6,$5B5BFDE15D5AFFE3,$6367FDE06162FFE0,$6966FDD9767DFFE1
      Data.q $4F3BFFCF584BFFCD,$5243FFFF5A46FFF3,$000054270D0AE3FF,$0000000000000E00,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$6550FFFF604B0000,$5847FFFE5E4BFFFF,$5747FFEC5646FFF1
      Data.q $5A4FFFE85A4AFFEA,$5E57FFE75D51FFE9,$625DFFE75E57FFE7,$6968FFDF605DFFE7,$5649FFCC5B54FFD4
      Data.q $4C36FFFB4630FFD9,$1813B8B63629FFFF,$0000120000006751,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$655135360F0B0000,$5A48FDF55B49FFFF
      Data.q $5A4AFDEE5847FFF1,$6052FDED5D4CFFEC,$6159FDF2655AFFF0,$4D42FED75E56FFE7,$503BFFE55342FFCF
      Data.q $2B1FE2E04735FFFF,$00003E2009079285,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$271F000000000000
      Data.q $5A49FFFF64507D8A,$5948FFEE5A48FFEE,$6456FFF36B59FFEC,$5242FFCA4337FFE6,$4638FFFF5542FFE9
      Data.q $00006C572019BDB8,$0000000000001500,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$614FC8D842350000,$6053FDEF5A49FFFC,$0500FD7C1510FFEC,$120DEB7C4136FE4C
      Data.q $0000000000007828,$0000000000000000,$00000C0000000000,$0000020000000F00,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$5A47000000000000,$5D4EFFF25E4EFDFF,$2419FFE2554EFFF0
      Data.q $0000EC040404FFA7,$000039000000A700,$00003E0000001F00,$00008B0000006200,$0000480000009000
      Data.q $0000000000000600,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0603000000000000,$5E4EFFFF67542421
      Data.q $4843FDF36353FFEC,$0303FFDA382AFFC9,$0000BD000000EC04,$261FD8400903B300,$1F1CFFA22418F190
      Data.q $0000BE000000F556,$0000030000004800,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000020000000000
      Data.q $6B56885818130800,$6E5CFFEC6250FFFF,$3C2CFFB83B36FFF9,$5F52FFCD4136FEE4,$6C6AFFF5675FFFFF
      Data.q $3729FFCA5252FFEF,$0000F43E1815FFE8,$00003B000000B400,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $00000E0000000000,$4536BB0000006E00,$6655FEF66854FBDB,$7063FDF76E5EFFF0,$665FFEF26E63FFF5
      Data.q $5E5BFDDE5E58FFE6,$4545FDE86E6EFFDB,$0C0BFFF64132FFB5,$0000A9000000F01C,$0000000000003000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$644C6B74221B0000,$664FFFFF6851FFFF,$6652FFEF634EFFF4,$6A5CFFF0695AFFF0
      Data.q $665DFFED6A60FFEF,$5C5BFFDE5E59FFE7,$797DFFDC6362FFDA,$483AFFA93A38FFED,$0000EC000302FFFE
      Data.q $0000290000009E00,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$5B4A000000000000,$5D49FFF2624AF3FF,$6350FDEA604CFFEB
      Data.q $6B5BFDED6855FFEC,$665CFDEE6B5EFFF0,$5B59FDDD5D57FFE7,$6E70FDDA6260FFD8,$3734FDF68A95FFE5
      Data.q $0000FFF94D40FFA5,$00007A000000D900,$0000000000000F00,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0908000000000000,$5F49FFFF6751261F
      Data.q $6451FFE9614BFFEB,$6E5DFFEF6756FFEC,$655CFFF06E60FFF0,$6863FFDA5751FFE6,$655EFFE26C67FFE1
      Data.q $5E50FFD8564EFFDD,$6151FFFF4936FFF0,$00003C000000F4FF,$0000000000000B00,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $624B888E30290000,$5D4BFDE85E4AFFFE,$6C59FDE56A56FFE5,$6458FDF37061FFF2,$0C04FDD2605FFFE7
      Data.q $2A20FE6D0F06FF72,$130FA2742A22EF85,$0000170000004E3A,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$5A48000000000000,$735AFFFF624AE5EF,$5D4EFFFF6E59FFFF,$5346FFE45D4DFFFE
      Data.q $4343FFD75048FFD8,$0000FE9B2D24FFB7,$000095000000E600,$0000000000002100,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$161257552C250600,$0505030000003826
      Data.q $3228FFF2493C1B08,$3E36FDB83027FFBB,$493EFEA73633FFC3,$0000E8000000FFE1,$0000330000009600
      Data.q $0000000000000D00,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$3B31553F1B180000,$2B21FFB32E25FFDF,$2C26FFC3453FFFB2,$0000FFF04F43FFA0
      Data.q $0000BF000000E700,$00001D0000007D00,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $00001B0000000000,$0000660000004D00,$1B18870000007C00,$3328FFC53229D857,$4C4AFDB62F25FFB5
      Data.q $3428FEC53A32FFC4,$0000FFE44D45FFC3,$00007B000000E200,$0000000000001200,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$1A137138100A0100,$2D23F17C231CD453,$3A2EFFBB362BF89B,$342AFFC23A30FED0
      Data.q $3228FFB8352CFFB7,$4B4AFFB53227FFB7,$4D44FFA92A20FFBE,$0000D5000000FEDC,$0000090000006400
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$392FD1DC4A3F0000,$3229FFC43128FFD8,$342AFEBF342AFFC1
      Data.q $362BFDB8352BFFBA,$362DFDB7362DFFB9,$3127FDB6342DFFB6,$3327FDB34748FFB3,$0000FB9D3831FFC4
      Data.q $00004E000000C800,$0000000000000300,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$493D030000000000,$392DFFC2362CFFED
      Data.q $382DFFBF382DFFC1,$372DFFBC362DFFBE,$352CFFB9372CFFB9,$342CFFB6362CFFB8,$3B3AFFB4352CFFB3
      Data.q $1F1BFFEC4337FFA1,$0000B8000000F555,$0000000000003B00,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$2B26000000000000
      Data.q $382DFFDF3D315D5F,$392EFDC1392EFFC3,$382EFDBD372EFFBF,$372EFDBA362EFFBA,$362EFDB6352EFFB8
      Data.q $3933FDB1342BFFB4,$5146FD912F2AFFB7,$0000F0180A08FFFF,$00002A000000A400,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$382DCAC94D410000,$382FFFC13A2FFFC8,$372EFFBC392DFFBF,$372EFFBB382EFFBC
      Data.q $342DFFB6362EFFB7,$2E29FFB1332BFFB4,$211AFFB03531FFAE,$0000FFFF594CFF8B,$000092000000E800
      Data.q $0000000000001D00,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$5043070000000000,$342BFEBC3329FFF1,$332AFDB73329FFBA
      Data.q $3028FDB43229FFB6,$2827FDAA2C26FFB0,$5253FFAF3A3CFFA7,$5E60FFB95455FFB7,$5649FF9A2219FFBE
      Data.q $0000A4000000FFFF,$0000010000004000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$2E27000000000000,$6152FFFF6E5D6268
      Data.q $6050FFF76050FFF2,$7760FFFF6A57FFFF,$8972FFFF826DFFFF,$6048FDFF755EFFFF,$5744D8DA5D47EBEC
      Data.q $352DB2B85947C6C8,$00005B511D18A396,$0000010000000C00,$0000000000000000,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000
      Data.q $251C5467261B0000,$16134E3C1D175F52,$010228120D0B3C26,$0000020000001600,$0000000000000000
      Data.q $0000000000000000,$0000000000000000,$0000000000000000,$0000000000000000,$FFFF000000000000
      Data.q $F8FFFF01FFFFFFE7,$00FF7F00C0FFFF00,$00E01F0000F83F00,$00E01F0000C01F00,$00F0FF0F00E0FF00
      Data.q $00FCFF8F07F8FF7F,$00F8FF0300FCFF07,$00F8FF0100F8FF03,$00FC7F0000FCFF00,$00FFFF0300FE7F00
      Data.q $F8FFFF0100FFFF07,$00FF7F0080FFFF00,$80FF1F0080FF3F00,$E0FF0F00C0FF1F00,$F0FF0300E0FF0700
      Data.b $00,$03,$FF,$F8,$0F,$FF
      icon_ico_end:
    EndDataSection
  CompilerCase #PB_OS_Linux
    UsePNGImageDecoder()
    CatchImage(#Img_Main, ?icon_png_start)
    DataSection
      icon_png_start:
      ; size : 1830 bytes
      Data.q $0A1A0A0D474E5089,$524448490D000000,$2000000020000000,$7A7A730000000608,$59487009000000F4
      Data.q $0E0000C40E000073,$00001B0E2B9501C4,$C35854414449D806,$C615659C8C7B97AD,$3B2E6F9BE6F9EF7F
      Data.q $6EEDBB776ED6DDDD,$BD02A16CB4B6EDDB,$62921A8A2C142978,$31346086A2831100,$25E2689A25E3549A
      Data.q $304A482089A354C4,$5BA942534B22D0D5,$7A5A940B52B72A50,$CCECEEEDB3B5DDA5,$EBCEFBFDCECEECEC
      Data.q $2785EEA436890C1F,$E73BE79EF37BFF79,$77B81A619F39CF39,$E553C4D623ADFB59,$72A5D367E2AA68DA
      Data.q $E80D3562CA513B3A,$2BD5FE0D5332DE54,$CE1F6B8DFEF97F96,$3CC4008956B80BE7,$7485CF009E214448
      Data.q $99B0366CA923335A,$399F49C4E6C8356C,$DE99E4686FAC7E7D,$43A7600280BB4373,$73C1F2B1FCDB1BC0
      Data.q $18B55581311AADE7,$355F552B57D56B51,$3AD225CF66448DF0,$C2FD39C58DC1110F,$9EC7663566B9EE5E
      Data.q $1025DFE7801FC0ED,$8FFF5F3703F44A9A,$41546C2F5C294363,$842C7106B06A0A8C,$3A528CA825AA88C3
      Data.q $D987A66F08BC419D,$061A9F9FCC6AFEB2,$81129F06EFDBC0B2,$6E5C96AEECBE5E2F,$8D4620C55AC0124D
      Data.q $516B106351410606,$593931E3468A08C4,$6BB6D23DD596E92C,$F73800780FB018DF,$63B5B380964EEFDF
      Data.q $A0C758A33347A3DE,$A429DE45AC058AD6,$918C705588301415,$FDB92103FE7C7894,$E015F962A1C5A3B5
      Data.q $81149E1F8BADE07E,$1CD191B5EEBA9FD3,$0FAC62037C09F352,$7ADA88A203518D46,$576B165B62AA0826
      Data.q $81CEFE620AECACFA,$DBA65780EFC023C1,$B1ED9BEC537D6605,$633B0BA3445657E8,$1C86E6F11A28B79E
      Data.q $82318AB542988E3B,$918BADB44B147C0D,$74BB52D775716FB3,$40ED80AFC063BEF7,$B4055C0ED86D2669
      Data.q $B7ADEDB3FC402D01,$18B19CF2F35E637C,$8764C5BB0B59D03F,$1642DB71668B56AC,$FA9EBEFC073BEEEC
      Data.q $B7B5D70003E6FBEC,$CAFF1DB6A2C8F6DE,$BC1DF9E69F03604F,$B4D216BB9B02E17D,$F01CF038E021D9EB
      Data.q $6DF0810E9BA2C5C8,$4E06654E1CB7DD3D,$DA9ADBAE2307B2A6,$56A04D3860792EB4,$87EC0E59251AB3E3
      Data.q $C0C3FD9EE74DC4E7,$633F2049C0C3C013,$88A6C1A6F3BD1C27,$5A3B166A09B9A7CC,$081B056289963CE0
      Data.q $E7BD80D4C91AF9FD,$7025F817A021E9C8,$5D6C1764BCD9B276,$B0FE67118D17E2BD,$26B889098D48356F
      Data.q $95E3A88A18D2E31A,$A976DF6FB4F7C464,$228E8A2E574FC239,$8CCA5EAB33869789,$68CE82CD19E18115
      Data.q $5D22793E17FF5964,$71C7184E3822A32E,$133E4B1438079E31,$885098D9E6BC05E3,$446B472C6D44A55A
      Data.q $B305EDAD0F391C68,$4FF7BAF5E026F7AD,$BE50E1B99FFD032D,$A8AD628C63050156,$1063518A2A04EAB1
      Data.q $79E228BE52D61C27,$B4EBDD6D2D986F1A,$BC0696D6E4DB2FF7,$2991C0B5C083BD6D,$9513AFF692CB6097
      Data.q $B02D4A4245C84486,$8B06B58AE3011C62,$11882311118C5808,$F28FF27EEC13C489,$F00CFEF4F230E6B9
      Data.q $2CC129D363135D62,$DDAE3753E6E06EE0,$2F18D554E1D5DED8,$944EC50257155512,$4491C034572E537D
      Data.q $EF5C98EC743D1CD3,$A27258C4F0765867,$4574C6F039F817B0,$F99CEB47783C0138,$49552994DA2D974B
      Data.q $C7A5C743B7F03434,$2C7557331BB0ED14,$2A738DD5484D18A0,$9034DC93C7AB9499,$99BF002F0A27242E
      Data.q $59D871708A4BF04C,$AA94CA9CB74BE67A,$39A4E60D6FABAE78,$20FC644F07958177,$CDEE9D4637140C38
      Data.q $A7ACCAD6CDB4170B,$E001E4818EE2A16A,$DEC04466080FA03E,$8C2D44F21F2089F9,$FF57720FD7C5E197
      Data.q $9E17FABEFDF7C648,$05C00AC0A5813A07,$703E4675603BA99E,$82445E04AF3586FC,$FBFC1E4C7083554A
      Data.q $61BBBE672E46FAB3,$B3C7C3B1F0FC7DAD,$40FD800757EB97F9,$E13B666F9DD4E003,$1F0DEDF87F3BCB7D
      Data.q $82D45802B168C9FC,$767920257C99BB37,$1DEC0E2D38C6CE80,$63EF40E4EDB73E2B,$FE269846031E17FD
      Data.q $B7039AF8C6DAC087,$B5BEACB162D5FC7F,$EA238C471555A812,$4ADF05A237116138,$C25A6D34796C082E
      Data.q $DB9EAA5030A83F30,$C7A199D0F93D4C9E,$EF6026D3FD954BFB,$F91A95B175C5B4FE,$38EA0C6A2D4D4FAA
      Data.q $F17AE13011D45C18,$F1E538D10A1594C2,$840BB925815A8934,$FA1F7BF2A4F661C2,$52F3B32877B7AA77
      Data.q $79B8D8060262F8A3,$B9EEEAAF1FD6E36E,$80B56300442DA3A2,$1D6A383111D6A292,$A909A88B5511AC57
      Data.q $794AE2353D842355,$07464587E44E8B4E,$39438F10D1CA5A59,$E44EB7F2F7D65E48,$9A069FFFC6057F8B
      Data.q $965BB5C0B580CB80,$8905EE9EA3F75FCC,$D407E130F8287339,$021C5046038D608C,$599DEF5C4212B06B
      Data.q $4075904B1C206E11,$3F4B06E7A3CDDD5E,$31BD19BEB3B8353B,$C0959FB7D50C36D9,$92C57F7E36570EFA
      Data.q $35EB66B2FCBDEF2B,$68EB58A07C96AA30,$B8C5848A23AC4560,$8D252B1484BD7521,$FF2D9437BE567E1D
      Data.q $627A2B7D66F23929,$600E80C42F781932,$BE1B629B1B91F035,$22BA4B4DF2F96AB3,$028A8D5AB181A663
      Data.q $98E7CF18248E108E,$9E170FF47710E67B,$F4F02DF813FDC91F,$DD0236EF77C2774C,$FD982DAF86C035C0
      Data.q $EBCF168B3D3D2DA1,$79DA4A90B826E320,$4FE7F68F47CDB7A9,$54DF6B0DD52F8BE6,$026C06D6062A698C
      Data.q $45CAF5FBE84F307E,$CDCF5CECBAAB3D99,$BFBD39BAC6E0A7D4,$B810B00881EFA73F,$A6D7EF5EBF5E2EB2
      Data.q $6933F5E207EF8AEA,$998655199F1807FC,$4549000000000EF8
      Data.b $4E,$44,$AE,$42,$60,$82
      icon_png_end:
    EndDataSection
CompilerEndSelect

OpenWindow(0, #PB_Ignore, #PB_Ignore, 640, 480, "")
CompilerSelect #PB_Compiler_OS
  CompilerCase #PB_OS_Windows
    SendMessage_(WindowID(0), #WM_SETICON, 0, ImageID(#Img_Main))
  CompilerCase #PB_OS_Linux
    gtk_window_set_icon_(WindowID(0), ImageID(#Img_Main)) 
CompilerEndSelect

AddSysTrayIcon(0, WindowID(0), ImageID(#Img_Main))

Repeat
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      Break
  EndSelect
ForEver

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 4:27 pm
by sartic
Thx 4 code.
So, only solution is embedding data for icon in source?

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 4:44 pm
by ts-soft
IncludeBinary does the same. Datas is only to post the icon as source in the forum!

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 6:27 pm
by RASHAD
I am not sure about Linux it is tested with Windows only

Code: Select all

Import ""
  PB_Window_Icon
EndImport

OpenWindow(0, #PB_Ignore, #PB_Ignore, 180, 70, "", #PB_Window_SystemMenu)
AddSysTrayIcon(0, WindowID(0), PB_Window_Icon)

While WaitWindowEvent() <> #PB_Event_CloseWindow : Wend

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 6:45 pm
by ts-soft
RASHAD wrote:I am not sure about Linux it is tested with Windows only
Can't work on linux! There is no resource-section in linux-executable to store images.
Normal, the programicons are stored in a central-dir for all applications.

Re: How to use program icon for tray icon?

Posted: Sun Aug 19, 2012 6:57 pm
by RASHAD
Thanks
Good to know

Re: How to use program icon for tray icon?

Posted: Tue Sep 11, 2012 6:15 pm
by sartic
RASHAD wrote:I am not sure about Linux it is tested with Windows only

Code: Select all

Import ""
  PB_Window_Icon
EndImport

OpenWindow(0, #PB_Ignore, #PB_Ignore, 180, 70, "", #PB_Window_SystemMenu)
AddSysTrayIcon(0, WindowID(0), PB_Window_Icon)

While WaitWindowEvent() <> #PB_Event_CloseWindow : Wend
it works for win, nice ! :)
All times are UTC+01:00
Page 1 of 1

Powered by phpBB® Forum Software © phpBB Limited