[..] Problème avec TrayItemSetOnEvent !

[Oknax]

J'ai ce code :

Code : Tout sélectionner

Global $tray = TrayCreateMenu("Controles Diverses")
Global $trays = TrayCreateItem("Mode silencieux", $tray)
TrayItemSetOnEvent($trays,"silence")
Global $quit = TrayCreateItem("Quitter", $tray)
TrayItemSetOnEvent($quit,"Form1Close")

Seulement, lorsque je clique rien ne se passe.. Une solution ?

[silvere]

Tu veut dire que quand tu clique sur un item du menu de l'icone rien ne se passe ?
Peut-tu nous donner ton scripte complet dans la balise [code] Ton scripte [/code] car c'est plus facile de le distingué.

[mikell]

► Afficher le texte

Code : Tout sélectionner

#NoTrayIcon
Opt("TrayOnEventMode",1)
Opt("TrayMenuMode",1)

Global $tray = TrayCreateMenu("Controles Diverses")
Global $trays = TrayCreateItem("Mode silencieux", $tray)
TrayItemSetOnEvent($trays,"silence")
Global $quit = TrayCreateItem("Quitter", $tray)
TrayItemSetOnEvent($quit,"_Exit")
TraySetState()

While 1
Wend

Func silence()
Msgbox(0,"", "silence")
EndFunc

Func _Exit()
Exit
EndFunc