[R] Comment décocher uniquement les cases cochées ?

[Yogui]

Bonjour,

je "joue" avec autoit depuis quelques jours et je bloque sur des checkboxs

je voudrais faire un script qui propose un certain nombre d'action à réaliser après un choix par case à cocher, mais qu'un fois l'action réaliser la case se décoche (j'espère être claire)

j'ai passé pas mal de temps dans les tutos et dans les exemples je ne trouve pas comment décocher simplement une case après traitement (dans mon exemple affichage d'un messagebox)

mon erreur doit être ici

Code : Tout sélectionner

GUICtrlSetState("case" & $i,$GUI_UNCHECKED)

(pour construire ce code je me suis largement inspiré de la tuto)

► Afficher le texte

Code : Tout sélectionner

#cs ----------------------------------------------------------------------------
    
#ce ----------------------------------------------------------------------------

#include <GuiConstants.au3>
#NoTrayIcon

; Déclaration des variables.
Global $Largeur = 400, $Hauteur = 300, $Titre = "Form1 "
Local $Ver = "V1.0"


#region ### START Koda GUI section ###

; Fenetre principale.
$Form1 = GUICreate($Titre & $Ver, $Largeur, $Hauteur, -1, -1)
;cases à cocher
$ini_case1 = "test1"
$case1 = GUICtrlCreateCheckbox($ini_case1, 10, 10, 120, 20)
$ini_case2 = "test2"
$case2 = GUICtrlCreateCheckbox($ini_case2, 10, 30, 120, 20)
$ini_case3 = "test3"
$case3 = GUICtrlCreateCheckbox($ini_case3, 10, 50, 120, 20)
$ini_case4 = "test4"
$case4 = GUICtrlCreateCheckbox($ini_case4, 10, 70, 120, 20)
; Bouton OK.
$Button1 = GUICtrlCreateButton("GO", 150, 250, 75, 25)

GUISetState(@SW_SHOW)

#endregion ### START Koda GUI section ###






While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Fin()

        Case $Button1
            
            For $i = 1 To 4
                If BitAND(GUICtrlRead(Eval("case" & $i)), $GUI_CHECKED) Then
                    MsgBox(0,"case","case" & $i)
                    GUICtrlSetState("case" & $i,$GUI_UNCHECKED)

                EndIf
            Next

    EndSwitch
WEnd



#region ################### Fonctions ###################
Func Fin()
    ; Lancement du splash screen.
    SplashTextOn("", "Fermeture du script en cours,  Veuillez patienter ...", 450, 70, -1, -1, 0 + 1 + 16 + 32, "Times New Roman", 12, 800)

    ; Pause de 1 seconde.
    Sleep(1000)

    ; Fermeture du splash.
    SplashOff()

    Exit
EndFunc   ;==>Fin
#endregion ################### Fonctions ###################

[sylvanie]

Bonsoir,

l'erreur est bien ciblée et sa résolution est :

Code : Tout sélectionner

GUICtrlSetState(eval("case" & $i),$GUI_UNCHECKED)

eval va "évaluer l'expression et donc reconstruire la variable.

[Yogui]

nickel ça fonctionne merci beaucoup pour votre aide