Page 1 sur 1
[R] TrayCreateItem coché
Posté : ven. 17 oct. 2008 16:48
par Vins83
Bonjour à tous.
On sait que si sur une checkbox est coché sa donne:
If BitAND(GUICtrlRead($ma_checkbox), $GUI_CHECKED) then
l'action se passe......
endif
Mais j'ai voullu tester avec une TrayCreateItem:
$ma_traycreateitem = TrayCreateItem("Anglais", -1, -1, 1)
If BitAND(GUICtrlRead($ma_traycreateitem),$TRAY_CHECKED) Then
ben là sa bug,rien ne se passe...
endif
Quelqu'un a t'il une idée?
Merci beaucoup
Re: [..] TrayCreateItem coché
Posté : ven. 17 oct. 2008 17:32
par L4crymal
Est ce que les CREATEITEM son considéré comme des CTRL ???
Si non alors le GUICtrlRead ne sert à rien, je peut me tromper naturellement mais je pense que c'est juste le GUICtrlRead qui faut remplacer par une autre détection.
Re: [..] TrayCreateItem coché
Posté : ven. 17 oct. 2008 17:36
par Vins83
Effectivement,celà ne fonctionne pas avec un GUICtrlRead alors,je test sans succé pour le moment.
++ Vins
Re: [..] TrayCreateItem coché
Posté : ven. 17 oct. 2008 17:43
par Vins83
C'est bon,j'ai trouver la solution:
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <Constants.au3>
Opt("TrayMenuMode", 1)
$choix_langues = TrayCreateMenu("Langues")
$langues_anglais = TrayCreateItem("Anglais", $choix_langues)
$langues_francais = TrayCreateItem("Français", $choix_langues)
TrayItemSetState($langues_francais, $TRAY_CHECKED)
TrayCreateItem("")
$exititem = TrayCreateItem("Quitter")
Func langues()
If BitAND(TrayItemGetState($langues_anglais), $TRAY_CHECKED) Then
$texte1 = "Anglais"
EndIf
If BitAND(TrayItemGetState($langues_francais), $TRAY_CHECKED) Then
$texte1 = "Français"
EndIf
GUICtrlCreateLabel($texte1, 20, 20)
EndFunc ;==>langues
GUICreate("My GUI")
GUISetState(@SW_SHOW)
AdlibEnable("langues", 0)
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $langues_anglais
TrayItemSetState($langues_francais, $TRAY_UNCHECKED)
TrayItemSetState($langues_anglais, $TRAY_CHECKED)
Case $msg = $langues_francais
TrayItemSetState($langues_anglais, $TRAY_UNCHECKED)
TrayItemSetState($langues_francais, $TRAY_CHECKED)
Case $msg = $exititem
ExitLoop
EndSelect
WEnd
Merci beaucoup
Re: [R] TrayCreateItem coché
Posté : ven. 17 oct. 2008 17:57
par L4crymal
Tout est bien qui fini bien
