scrolbare pour suite de chckbox
[ Nouvelle discussion
| Répondre au groupe
|
fr.comp.lang.tcl ]
Sujet: scrolbare pour suite de chckbox
De: cou...@coucou.com (Fabien)
Groupes: fr.comp.lang.tcl
Organisation: Guest of ProXad - France
Date: 06. May 2008, 21:20:04
|
Bonsoir,
Je suis en train de faire un petit script qui ressemble a l'exemple ci
dessous.
Dans mon script réel, j'ai +eurs dizaine de bouton, j'aurais donc voulu
pouvoir les faire défiler via une barre sur le coté.
Après avoir cherché, je sais qu'il faut passer par un canvas, mais
malgré de nombreux essai, je n'ai pas trouvé la bonne syntaxe.
Si quelqu'un pouvais me dire les modifi tion a faire pour pouvoir faire
défiiler ces boutons.
Dans l'exemple on selectionne les boutous et cela erit le résultat dans
un fuchier.
Merci d'avance,
Fabien
-------------------------------------
frame .top
pack configure .top -expand 1 -fill both -side top
frame .select
pack configure .select -side bottom
checkbutton .select.bouton1 -text "Mon Bouton un" -variable bouton1var
pack configure .select.bouton1
checkbutton .select.bouton2 -text "Mon Bouton deux" -variable bouton2var
pack configure .select.bouton2
checkbutton .select.bouton3 -text "Mon Bouton trois" -variable bouton3var
pack configure .select.bouton3
frame .top.runbutton
pack configure .top.runbutton -expand 1 -fill both
button .top.runbutton.executebutton -text "RUN" -command {
set fplist [open "Resultats.txt" w]
if {$bouton1var != 0} {
puts $fplist "bouton 1\n"
}
if {$bouton2var != 0} {
puts $fplist "bouton 2\n"
}
if {$bouton3var != 0} {
puts $fplist "bouton 3\n"
}
close $fplist
}
pack configure .top.runbutton.executebutton

|
 cette fonctionnalité est reservée aux membres ayant une session active !
|