[..] Problèmes de variable GUI

Aide sur les Interfaces Graphique Utilisateurs (GUI).
Règles du forum
.
Répondre
SoilyThang
Niveau 3
Niveau 3
Messages : 43
Enregistré le : lun. 29 oct. 2007 21:20
Status : Hors ligne

[..] Problèmes de variable GUI

#1

Message par SoilyThang »

voila , Bonjours a tous

j'esseye de faire un petit script pour m'amuser , et j'ai esseyer sa

Code : Tout sélectionner


#include <GuiConstants.au3>


GUICreate("XxXXx", 250 , 250 )
$GuiLoginButton = GUICtrlCreateButton("Start", 15 , 95 , 55, 25)
GuiCtrlCreateGroup("Barre", 187 , 1, 50 , 90)
$F1=GuiCtrlCreateRadio("F1", 195, 15, 35)
$F2=GuiCtrlCreateRadio("F2", 195, 32, 35)
GuiCtrlSetState(-1, $GUI_CHECKED)
$F3=GuiCtrlCreateRadio("F3", 195, 48, 35)
$F4=guiCtrlCreateRadio("F4", 195, 64, 35)
GUICtrlCreateGroup ("",-99 ,-99,1,1)
GuiCtrlCreateGroup("Case", 5 , 1 , 165 , 70)
$1=GuiCtrlCreateRadio("1", 15, 15)
$2=GuiCtrlCreateRadio("2", 45, 15)
$3=GuiCtrlCreateRadio("3", 75, 15)
$4=guiCtrlCreateRadio("4", 105, 15)
$5=GuiCtrlCreateRadio("5", 135, 15)
$6=GuiCtrlCreateRadio("6", 15, 40)
$7=GuiCtrlCreateRadio("7", 45, 40)
$8=guiCtrlCreateRadio("8", 75, 40)
$9=guiCtrlCreateRadio("9", 105, 40)
$0=guiCtrlCreateRadio("0", 135, 40)
GUICtrlCreateGroup ("",-99 ,-99,1,1)
GUISetState ()



While 1
   $msg = GUIGetMsg()
   Select
    Case $msg = $GuiLoginButton & $F1 & $1
    F11()
    Case $msg = $GuiLoginButton & $F1 & $2
    F12()
   EndSelect
WEnd

func F11()
    msgbox(1 , "Coucou")
    sleep(1000)
    send("{F1}")
    sleep(1000)
    send("{1}")
    sleep(1800000)
    F11()
endfunc

func F12()
    msgbox(1 , "Coucou")
    sleep(1000)
    send("{F1}")
    sleep(1000)
    send("{2}")
    sleep(1800000)
    F12()
endfunc
En gros , je crée des petit bouton avec des numeros ( 1-> 0 et F1-> F4)
j'aimerais que par exemple la combinaison de 1 et F1 pui du bouton Start donne la fonction F11()

Est-ce possible ?
merci d'avance pour votre aide =)

ps : le code complet peut etre donner si besoin
ps² : j'ai pris les codes "GuiCtrlCreateRadio" dans le SampleControls.au3 des exemples dans le dossier autoit
Avatar du membre
Tlem
Site Admin
Site Admin
Messages : 11773
Enregistré le : ven. 20 juil. 2007 21:00
Localisation : Bordeaux
Status : Hors ligne

Re: [..]Problemes de variable GUI

#2

Message par Tlem »

SoilyThang a écrit :En gros , je crée des petit bouton avec des numeros ( 1-> 0 et F1-> F4)
j'aimerais que par exemple la combinaison de 1 et F1 pui du bouton Start donne la fonction F11()

Est-ce possible ?
Oui.

Code : Tout sélectionner

#include <GuiConstants.au3>
Dim $Res

GUICreate("XxXXx", 250 , 250 )
$GuiLoginButton = GUICtrlCreateButton("Start", 15 , 95 , 55, 25)
GuiCtrlCreateGroup("Barre", 187 , 1, 50 , 90)
$F1=GuiCtrlCreateRadio("F1", 195, 15, 35)
$F2=GuiCtrlCreateRadio("F2", 195, 32, 35)
GuiCtrlSetState(-1, $GUI_CHECKED)
$F3=GuiCtrlCreateRadio("F3", 195, 48, 35)
$F4=guiCtrlCreateRadio("F4", 195, 64, 35)
GUICtrlCreateGroup ("",-99 ,-99,1,1)
GuiCtrlCreateGroup("Case", 5 , 1 , 165 , 70)
$1=GuiCtrlCreateRadio("1", 15, 15)
$2=GuiCtrlCreateRadio("2", 45, 15)
$3=GuiCtrlCreateRadio("3", 75, 15)
$4=guiCtrlCreateRadio("4", 105, 15)
$5=GuiCtrlCreateRadio("5", 135, 15)
$6=GuiCtrlCreateRadio("6", 15, 40)
$7=GuiCtrlCreateRadio("7", 45, 40)
$8=guiCtrlCreateRadio("8", 75, 40)
$9=guiCtrlCreateRadio("9", 105, 40)
$0=guiCtrlCreateRadio("0", 135, 40)
GUICtrlCreateGroup ("",-99 ,-99,1,1)
GUISetState ()



While 1
   $msg = GUIGetMsg()
   Select
   Case $msg = $GUI_EVENT_CLOSE
        Exit

    Case $msg = $GuiLoginButton
        If BitAND(GUICtrlRead($F1), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($1), $GUI_CHECKED) = $GUI_CHECKED Then
            F11()
        ElseIf BitAND(GUICtrlRead($F1), $GUI_CHECKED) = $GUI_CHECKED And BitAND(GUICtrlRead($2), $GUI_CHECKED) = $GUI_CHECKED Then
            F12()
        EndIf
   EndSelect
WEnd

func F11()
   $Res = msgbox(1 , "F11", "Choix F11")
   If $Res = 2 Then Return
   msgbox(0 , "F11", "Vous avez accepté l'action de la commande F11")
endfunc

func F12()
    msgbox(1 , "F12", "Choix F12")
    If $Res = 2 Then Return
    msgbox(0 , "F12", "Vous avez accepté l'action de la commande F12")

endfunc
Thierry

Rechercher sur le forum ----- Les règles du forum
Le "ça ne marche pas" est une conséquence commune découlant de beaucoup trop de raisons potentielles ...

Une idée ne peut pas appartenir à quelqu'un. (Albert Jacquard) tiré du documentaire "Copié n'est pas volé".
Répondre