AddSysTrayIcon & ChangeSysTrayIcon

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
Droopy
Messages : 1151
Inscription : lun. 19/juil./2004 22:31

AddSysTrayIcon & ChangeSysTrayIcon

Message par Droopy »

Bonjour à tous, Je suis nouveau et ai un petit problème
Je teste Purebasic 3.90 et la fonction AddSysTrayIcon me pose un soucis

1° si j'inclus plusieurs icones dans mon fichier pb
AddSysTrayIcon affiche toujours le 1er icone inclus !!

2° ChangeSysTrayIcon ne change pas l'icone du Systray

bref si qqun à une idée je suis preneur ( j'ai déjà fouillé sur le Forum US )
julien
Messages : 846
Inscription : ven. 30/janv./2004 15:06
Contact :

Message par julien »

1)
Change simplement l'ID de l'image
AddSysTrayIcon(#SysTrayIcon, WindowID, ImageID)

2)
Si indique un autre ID
ChangeSysTrayIcon(#SysTrayIcon, ImageID)


Pour obtenir un ID
ID= CatchImage(#Image, MemoryAddress)
Avatar de l’utilisateur
Droopy
Messages : 1151
Inscription : lun. 19/juil./2004 22:31

Je pense avoir fait ce que tu indique mais ça ne marche pas

Message par Droopy »

; Lecture des images, depuis les labels
CatchImage(0,?image0)
CatchImage(1,?image1)

OpenWindow(0,0,50,30,50,#PB_Window_SystemMenu,"CPU")
CreateGadgetList(WindowID(0))

AddSysTrayIcon(0,WindowID(0),UseImage(0))
ChangeSysTrayIcon(0,UseImage(1))


Repeat
a=WaitWindowEvent()
Delay (100)
Until a=#PB_Event_CloseWindow
End

; Include des Icones
image0: IncludeBinary "0.ico"
image1: IncludeBinary "16.ico"
Avatar de l’utilisateur
Droopy
Messages : 1151
Inscription : lun. 19/juil./2004 22:31

Message par Droopy »

Je pense avoir fait ce que tu indique, mais ça ne fonctionne pas
Trouve plus haut mon code
Avatar de l’utilisateur
Flype
Messages : 2431
Inscription : jeu. 29/janv./2004 0:26
Localisation : Nantes

Message par Flype »

ton bout de code marche très bien chez moi, je vois pas où est le problème

par contre du devrais mettre tes datas entre ces mot clés :

DataSection
; img
EndDataSection
Image
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

Flype dans ce cas a voulu parler de tes includebinary pas de "Data":D

Code : Tout sélectionner

 DataSection
   image0:
   IncludeBinary "0.ico"
   image1:
   IncludeBinary "16.ico"
EndDataSection
:D
Avatar de l’utilisateur
Droopy
Messages : 1151
Inscription : lun. 19/juil./2004 22:31

Message par Droopy »

Je vous remercie de votre aide
J'ai trouvé d'où vient le problème
ce sont les icones que j'ai créé qui bug, ça marche avec d'autres icones

alors que mes icones fonctionnent avec ImageGadget !!

Il doit y avoir plusieurs format d'icones ! ?

bref un grand merci
Répondre