Gambas France BETA


Pas de compte ? Incription

Button :

Un exemple d'utilisation de bouton :



Téléchargeable ici : les Boutons

Nous souhaitons obtenir un comportement inverse de celui des RadioButton, quand on clique sur un bouton, celui-ci se désactive, les autres s'activent.



Le code :


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
' Gambas class file

'<------------------------------------- pour chaque bouton on ajuste les propriétés "Group" et "Action"
'<------------------------------------- après avoir créé un "Group", ici nommé "mesBoutons",
'<------------------------------------- on créé une "Action" commune aux boutons, ici nommée "Bouton"
'<------------------------------------- on créé l'évènement _Click() associé au "Group"

PUBLIC SUB mesBoutons_Click()

Action["bouton", ME].Enabled = TRUE '<-------------------------------------- active ou désactive tous les contrôles associés à une action
LAST.Enabled = FALSE
Message.Info(LAST.Text & gb.CrLf & ("has been clicked"), ("OK"))

END

PUBLIC SUB btnReset_Click()

Button1.Enabled = TRUE
Button2.Enabled = TRUE
Button3.Enabled = TRUE
Button4.Enabled = TRUE

END

PUBLIC SUB btnClose_Click()

ME.Close()

END



====================

Documentation Directe :



====================

Navigation :



<-- Liens du Wiki : <--
<-- Accueil du WIKI : <--
<-- Contrôle par Contrôle <--

====================

Documentation :



====================