[R] Est il possible de construire une variable ?

[Julien]

Bonjour,

Je m'explique, j'ai une série de case à cocher avec des noms génériques de type :

Code : Tout sélectionner

Global $Check_apps_1 = GUICtrlCreateCheckbox("Apps 1", 32, 166, 97, 17)

J'en ai 21 au total. Je voudrais leur donner des noms stocker dans un tableau :

Code : Tout sélectionner

Global $Name[5] = [4 _
    , "Nom 1" _
    , "Nom 2" _
    , "Nom 3" _
    , "etc.." _
]
 

L'idéal serait de faire une boucle pour limiter le code et la je bloque.
Je sais que ce qui suit ne fonctionne pas :

Code : Tout sélectionner

$h = 1
For $j = $Name[0] To 1 Step -1
    GUICtrlSetData($Check_apps_[$h], $Name[$j])
    $h = $h + 1
Next
 

Mais est-ce possible d'incrémenter la variable $Check_apps_X ?

D'avance merci.

[matwachich]

C'est quoi ça, tout seul sur une ligne???

Code : Tout sélectionner

$Check_apps_[$h]

[Julien]

Une erreur de copier/coller je viens de corriger.

peux être existe t'il une autre méthode ?

[Iste]

Vous pouvez utiliser un tableau pour noter les id.

Sinon, voir http://autoitscript.fr/forum/viewtopic. ... 372#p42372

[mikell]

Pas bien compris, avec les $Name tu veux changer le nom de la variable-checkbox ou le texte de la checkbox ?

[Julien]

Je veux afficher les noms de mes 21 checkbox en fonction du array qui contient les 21 noms.

[moi]

l'array est défini avant la creation d'une gui
puis un for semble nous tendre les bras

Code : Tout sélectionner

for $i = 0 to ubond($array) step 1
$arrayquigereleschek[$i] = guictrlcreatecheckbox($array[$i],[color=#FF0000][formule qui définie la place,idem][/color])
next

ce qui est en rouge est a remplacer par une formule qui définie la place comme 8*$i etc...

[mikell]

Ces explications sont plutôt confuses mais ça me semble effectivement être la meilleure solution

[GaRydelaMer]

Bonsoir

y'a beaucoup d'erreur dans ta gestion des tableaux.

1/ For $i = 0 yo Ubound($array) -1

2/ c pas une erreur mais ca sert à rien Step 1, la boucle for incrémente toujours de 1 si Step n'est pas spécifier

Maintenant voila comment je fais:

Code : Tout sélectionner

Local $aCheckBoxs[6][3] = [ [5, 0, 0], _  ;       Ici initialisation du tableau [6] éléments (le 1er [0] pour stocker le nombre de chkb, [3] colonnes, donc [5] sur la 1ere ligne
        ["Nom 1", True], _ ;    Ici La 1ere Chkb, texte "Nom1", et on la veux coché
        ["Nom 2"], _
        ["Nom 3", True], _
        ["Nom 4"], _
        ["Nom 5"]]


Local $Left = 10, $Top = 30
; Ici on va lire le tableau en partant de 1, jusqu'a 5 ( $aCheckBoxs[0][0] ) donc on va créer 5 chkb, le $i va représenter les ligne du tableau
For $i = 1 To $aCheckBoxs[0][0]
    $aCheckBoxs[$i][2] = GUICtrlCreateCheckbox($aCheckBoxs[$i][0], $Left, $Top * $i), ici je stocke le CtrlId dans la 3ème colonne $aCheckBoxs[$i][2], et je prends le texte dans le tableau la 1ere colonne $aCheckBoxs[$i][0]
    If $aCheckBoxs[$i][1] Then GUICtrlSetState(-1, $GUI_CHECKED), ici je vérifie la 2eme colonne pour coché ou non la ckb
Next
 

Maintenant pour lire les valeurs c'est pareil dans l'autre sens

Code : Tout sélectionner

For $i = 1 To $aCheckBoxs[0][0]
    $aCheckBoxs[$i][1] = False
    If _IsChecked($aCheckBoxs[$i][2]) Then
        $aCheckBoxs[$i][1] = True
        ConsoleWrite("ChkB: " &$aCheckBoxs[$i][2] & " Text: " & $aCheckBoxs[$i][0] & " est coché" & @LF)
    EndIf
Next

Func _IsChecked($h_ctrl)
    Return BitAND(GUICtrlRead($h_ctrl), $GUI_CHECKED) = $GUI_CHECKED
EndFunc   ;==>_IsChecked
 

Alors explication, je créer un tableau à 2 dimension, pour définir et stocker les ID des contrôles.

Écris de cette façon je trouve que la création de tableau est plus claire, Donc on a 5 checkboxs, et le tableau a 3 colonnes dans la 2eme dimmension, pour stocker le texte utilisé au moment de la création, en suite si on veut l’état coché à la création, et dans la dernière le CtrlId

[Julien]

Bonjour,

J'etais en train de regarder de ce coté :

Code : Tout sélectionner

    For $i = 1 To $Name[0]
        Assign("Check_apps", "Check_apps_" & $i, 2)
        GUICtrlSetData($Check_apps, $Name[$i])
    Next
 

Mais cela ne fonctionne pas le $Check_apps renvoie bien le nom modifié par Assign mais n'est pas pris en compte dans le GUICtrlSetData.

Je vais regarder autre chose.

l'array est défini avant la creation d'une gui
puis un for semble nous tendre les bras

Code : Tout sélectionner

for $i = 0 to ubond($array) step 1
$arrayquigereleschek[$i] = guictrlcreatecheckbox($array[$i],[color=#FF0000][formule qui définie la place,idem][/color])
next

ce qui est en rouge est a remplacer par une formule qui définie la place comme 8*$i etc...

Je préfère ne pas procéder ainsi pour garder mon code GUI généré par Koda le plus propre possible en cas de modification.

[Julien]

Je n'etais pas très loin car cela fonctionne avec :

Code : Tout sélectionner

 For $i = 1 To $Name[0]
        Assign("Check_apps", "Check_apps_" & $i, 2)
        GUICtrlSetData(Eval($Check_apps), $Name[$i])
    Next

Je vais faire mes test pour savoir si cette solution me convient sinon j’opterais pour la dernière réponse (que je viens de comprendre).

Merci pour l'aide.

[Iste]

Vous n'avez pas besoin de la fonction Assign(), remplacez simplement

Code : Tout sélectionner

GUICtrlSetData($Check_apps_[$h], $Name[$j])

par

Code : Tout sélectionner

GUICtrlSetData(Eval("Check_apps_" & $i), $Name[$j])

edit : corrigé

[Tlem]

*** Attention, avec Eval il ne faut pas utiliser le '$'.
J'me suis fait avoir aussi en écrivant une réponse de tête.

[Iste]

je le savais pourtant...

[Julien]

Vous n'avez pas besoin de la fonction Assign(), remplacez simplement

Code : Tout sélectionner

GUICtrlSetData($Check_apps_[$h], $Name[$j])

par

Code : Tout sélectionner

GUICtrlSetData(Eval("Check_apps_" & $i), $Name[$j])

edit : corrigé

Merci à tous pour votre aide.