[R] Lecture d'une Checkbox grâce à son Label

[Bayo]

Bonjour,

Je voulais savoir si il était possible de savoir si une Checkbox est coché ou non grâce à son Label.

En faite j'aimerai en lisant les Sections d'un fichier ini dans une boucle, vérifier si la checkbox qui aurait le même nom est coché ou pas. Si c'est possible je dois mal m'y prendre

Dans l'exemple, lorsque ça lis la section EXCEL dans le fichier ini j'aimerai voir si la checkbox avec le label excel est coché.
Merci pour votre aide.

Code : Tout sélectionner

Global $excel = GUICtrlCreateCheckbox("Excel", 40, 32, 137, 17)

$ini = @ScriptDir & "\logiciels.ini" 

            $lop = IniReadSectionNames($ini) ; On place notre commande dans une variable
            For $i = 1 To $lop[0] ;on commence la boucle pour analyser ligne par ligne le fichier
                If GUICtrlSetState($lop[$i], $GUI_CHECKED) Then
..
Else
EndIf
 

[blacksoul305]

Bonsoir,

voici un code qui devrait fonctionner de la façon demandée.

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

$gui = GUICreate("lol")
$checkbox = GUICtrlCreateCheckbox("Madison",0,0)
$button = GUICtrlCreateButton("test",100,100)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $button
            _GetCheckBoxState()
    EndSwitch
WEnd

Func _GetCheckBoxState()
    Local $ini = @ScriptDir & "\check.ini", $temp = IniReadSectionNames($ini), $temp2
    For $i = 1 To $temp[0]
        $temp2 = ControlCommand("lol","","[CLASS:Button; TEXT:" & $temp[$i] & "]","IsChecked")
        If $temp2 Then MsgBox(0,"",$temp[$i] & " cochée !")
    Next
EndFunc
 

[Tlem]

Bonsoir.
Pour faire ce que vous demandez, vous avez besoin de la fonction _IsChecked() présente sur ce forum et de la fonction Eval pour transformer la valeur récupérée du fichier .ini en la valeur correspondante de votre script.

A condition que le label corresponde à l'ID. Sinon vous devrez trouver l'ID grâce au label et seulement après vous pourrez tester son état.

[mikell]

Code : Tout sélectionner

If GuiCtrlRead($checkbox, 1) = "Excel" AND GuiCtrlRead($checkbox, 0) = $GUI_CHECKED Then _
    Msgbox(0,"", "la checkbox Excel est cochée")

[Bayo]

Bonjour,

Merci à vous 3 pour vos réponses. La solution de Mikell ne correspond pas car il me faut la variable de la Checkbox or je ne l'ai pas. Par contre celle de blacksoul305 me va bien mais je n'arrive pas à la faire fonctionner, le ControlCommand me renvoi toujours 0 malgré que la case soit coché. J'ai même essayé de remplacer [CLASS:Button; TEXT:" & $temp[$i] & "] par [CLASS:Button; TEXT:Excel] dans mon exemple mais pareil.

Je vais essayer la solution de Tlem.

Merci.

[Bayo]

En mélangeant les solutions de Mikell et Tlem, j'ai réussi à obtenir le résultat souhaité, le voici.

Code : Tout sélectionner

$ini = @ScriptDir & "\logiciels.ini" 

$lop = IniReadSectionNames($ini) 
For $i = 1 To $lop[0]
       $temp = Eval($lop[$i])
       If GUICtrlRead($temp, 1) = $lop[$i] And GUICtrlRead($temp, 0) = $GUI_CHECKED Then

Merci de votre aide.