Page 1 sur 1
[..]Checkbox et tableau
Posté : lun. 12 oct. 2009 23:14
par Karl
Bonsoir,
Merci d'avance pour vos interventions.
Pourquoi la fenêtre ne se ferme pas quand je clique sur les boutons Annuler, Valider ainsi que sur la croix qui est censée la fermer?
Est-il possible de placer dans un tableau à deux dimensions de mélanger des infos numériques et des chaines?
J'aimerais réaliser un sondage.
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
Opt('MustDeclareVars', 1)
Opt("GUIOnEventMode",1)
local $arr[3][2] ; Will make space for 1 element.
local $msg,$box1,$box2,$box3,$i,$chaine,$valider,$annuler,$continue
GUICreate("A vous de choisir",300,200,0,0) ; will create a dialog box that when displayed is centered
GUICtrlCreateLabel("Choisir les actions à opérer",20,20)
$box1 = GUICtrlCreateCheckbox("CHECKBOX 1", 125, 40,75, 30)
$arr[0][0]=$box1
$arr[0][1]="BOX1"
$box2 = GUICtrlCreateCheckbox("CHECKBOX 2", 125, 60,75, 30)
$arr[1][0]=$box2
$arr[2][1]="BOX2"
$box3 = GUICtrlCreateCheckbox("CHECKBOX 3", 125,80,75, 30)
$arr[2][0]=$box3
$arr[2][1]="BOX3"
$valider=GUICtrlCreateButton("Valider",125,100)
$annuler=GUICtrlCreateButton("Annuler",80,100)
GUISetState() ; will display an dialog box with 1 checkbox
do
$msg = GUIGetMsg()
Select
Case $msg = $valider
Msgbox ( 0 , "" , "Vous avez cliqué sur OK" )
;~ $i=0
;~ while 1
;~ If not $arr[$i][0] Then
;~ $chaine &=$arr[$i][1]&@CRLF
;~ $i+=1
;~ EndIf
;~ If $i=3 then ExitLoop
;~ wend
MsgBox( 0,"Vos Choix :",$chaine)
Case $msg = $annuler
Msgbox ( 0 , "" , "Vous avez cliqué sur Annuler" )
$i=0
;~ while 1
;~ If not $arr[$i][0] Then
;~ $chaine &=$arr[$i][1]&@CRLF
;~ $i+=1
;~ EndIf
;~ If $i=3 then ExitLoop
;~ wend
MsgBox( 0,"Vos Choix :",$chaine)
EndSelect
Until $msg = $GUI_EVENT_CLOSE or $msg = $annuler or $msg=$valider
Re: [..]Checkbox et tableau
Posté : lun. 12 oct. 2009 23:43
par Tlem
Merci de ne pas utiliser la coloration syntaxique en dehors des forums qui y sont autorisés (voir règles de présentation à la fin).
Votre code à plusieurs défauts majeurs.
En premier lieu, vous utilisez des '
Case' sur des variables et vous ré-utilisez ces même variables pour le '
Until'. Cela ne peut être compatible car selon l'endroit ou vous vous trouvez dans la boucle lors du clic sur tel ou tel bouton, le '
Case' correspondant sera peut être exécuté ou non.
Si vous devez sortir de la boucle et donc du script c'est après les instructions des '
Case' qu'il faut rajouter la commande qui va bien tel qu'une sortie de boucle par exemple.
Ensuite, vous pouvez effectivement mélanger à volonté chaîne ou numérique.
Par contre dans votre script, je ne vois pas du tout l'intérêt de créer un tableau à deux dimensions et d'y stocker le contrôle ID de votre contrôle checkbox ainsi qu'un nom que vous lui attribué.
Si c'est pour tester l'état du contrôle, utilisez l'UDF
_IsChecked(). Un sujet récent à été abordé sur le même thème. Faites quelques recherches.
Re: [..]Checkbox et tableau
Posté : mar. 13 oct. 2009 00:10
par Karl
J'ai réduit le script à sa plus simple expression pour essayer d'isoler le problème.
J'ai donc inclut Exitloop à chaque case.
Mais rien n'y fait, je ne quitte toujours pas la fenêtre.
Mais que se passe-t-il?
Re: [..]Checkbox et tableau
Posté : mar. 13 oct. 2009 01:50
par orax
C'est le
Opt("GUIOnEventMode",1) qui est de trop. Cette option s'utilise avec
GUISetOnEvent().
Il faudra ajouter dans le Select :
Il y a aussi la variable $arr qui n'est pas déclarée.
Et la coloration syntaxique n'est pas réservée pour ce forum.
Tlem a écrit :Merci de ne pas utiliser la coloration syntaxique en dehors des forums qui y sont autorisés (voir règles de présentation à la fin).
Re: [..]Checkbox et tableau
Posté : mar. 13 oct. 2009 06:43
par Tlem
Rhoooo, j'avais même pas vu le
Opt("GUIOnEventMode",1).
@Karl
Comme je vous l'ai dit et comme l'à souligné orax, l'utilisation des balises autoit et donc la coloration syntaxique est réservée à d'autres forum. Donc merci de ne pas l'utiliser en dehors de ceux-ci.
Et puis vous n'allez quand même pas reprendre votre code à chaque message !!!
Re: [..]Checkbox et tableau
Posté : mar. 13 oct. 2009 13:27
par Karl
Bonjour,
Merci Orax et Tlem pour vos remarques.
Ok pour le Opt("GUIOnEventMode",1) que j'ai viré.
Ok pour la déclaration du tableau.
Ok pour l'utilisation double des variables.
Ok pour la fonction _IsChecked que j'ai inclue dans le script.
Ma fenêtre se ferme enfin.
Je passe à la deuxième partie de mon problème qui est la gestion des cases cochées.
J'aimerai que pour chaque case cochée, un programme se lance.
Dans le script cela donne :
case $msg=$valider
$i=0
while 1
If _IsChecked($arr[$i][0]) then
$cmd=ShellExecute($arr[$i][2])
Endif
$i+=1
If $i==3 then
exitloop
wend
ou les positions $arr[x][2] contiennent le nom des programmes à lancer.
Ca marche pour notepad.exe, wordpad.exe et cmd.exe.
1° Est ce que ce principe de gestion des prog à lancer est correcte?
2° Est-ce que je peux conserver ce prinicipe pour des éxcutions de programmes qui prennent du temps? Exemple : une sauvegarde de documents.
3° Puis-je remplacer les deux instructions $i+=1 et If $i==3 par une seule If ($i+=1)==3)? A l'éxécution, j'ai un message d'erreur me signalant une parenthèse ')' manquante.
4°Il existe certainement une fonction qui permet de cocher toutes les cases en en cochant une seule. Quelles sont les pistes?
5°En ce qui concerne l'usage de la coloration synthaxique, je ne pige pas ce qu'il faut faire. Faut-il oui ou non utiliser les balises [autoit][/autoit] dans les scritps que j'inclus dans les posts? Scite ne fournit que du texte coloré. Cmt faire pour ne pas avoir à le retaper dans le forum sans la coloration? Cmt fait-on pour "Spoiler" les scripts?
Cordialement,
Re: [..]Checkbox et tableau
Posté : mar. 13 oct. 2009 20:19
par Tlem
Lorsque vous placez un code dans un de vos messages, entourez le des balises CODE disponible dans les outils de mise en forme.
Pour le spoiler c'est la même chose, donc si vous voulez mettre un code en spoiler, cliquez d'abord sur code puis sur spoiler et ensuite placez votre code au milieux des quatre balises qui auront été créées.
(N'oubliez pas de ré-éditer votre message au dessus).