Gambas France BETA


Pas de compte ? Incription

Groupes de controle

Ce sujet est résolu.

1
AuteurMessages
décapode#1 Posté le 23/11/2013 à 17:30:51
Bien l'bonjour M'sieurs dames :sunny:
Je n'arrive pas à créer dynamiquement un groupe de contrôles.
Un ptit bout de code, 3/4 lignes me suffiraient.


Merci de vot'bon coeur
Reivillo#2 Posté le 23/11/2013 à 18:11:38
C' est ici, et nul part ailleurs. « Et pis c'est tout ! »Bonsoir décapode.

Tu peut donner un bout de ton Code.
Autrement tu les mets dans un Panel, par Exemple:
1
2
3
4
5
6
7
8
9
PUBLIC MyPanel AS NEW Panel(ME) AS "MyPanel"
PUBLIC MyButton AS NEW Button(MyPanel) AS "MyPanel"
'Puis tu donnes un Tag différent a chaque Controle.
PUBLIC SUB Form_Open()
MyButton.Tag=1
END
PUBLIC SUB MyPanel_MouseUp()
PRINT LAST.tag
END
Reivillo.





Version LinuxMint 13 (1.6.1-1+maya-mate(32-bit)) LTS Noyau 3.14.33-031433-generic (27-02-2015)
LinuxMint 13 Mate Fr ICI, LinuxMint 17 Mate Fr LÀ.
Programmation Gambas3 Installé depuis la Console Terminal avec successivement: Les 3 Lignes sudo en Gras ci-dessous...
sudo add-apt-repository ppa:gambas-team/gambas3
sudo apt-get update
sudo apt-get install gambas3 -y
Gambas3.8.4-57.47 (Mise à Jour Auto via mintupdate le 28-01-2016)
Pour la Doc, c'est vers là: Documentation Gambas3 FR
décapode#3 Posté le 23/11/2013 à 18:37:14
Bonsoir Maître.
Bon, moi j'étais parti en direction de mars.
J'essaie ça.
Reivillo#4 Posté le 23/11/2013 à 19:01:56
C' est ici, et nul part ailleurs. « Et pis c'est tout ! »Ça c'est Mieux...
Tout à l'heure, je n'avait pas Gambas,
sur le Pc Actif.
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
30
PUBLIC MyPanel AS NEW Panel(ME) AS "MyPanel" 'Entre guillemet Nom du Groupe
PUBLIC MyButton AS NEW Button(MyPanel) AS "MyPanel"
PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()

MyPanel.W = 100
MyPanel.H = 100
MyPanel.tag = 0
MyPanel.Border = Border.Plain
MyPanel.Visible = TRUE
MyButton.H = 50
MyButton.W = 50
MyButton.Tag = 1
MyButton.Visible = TRUE

END

PUBLIC SUB MyPanel_MouseUp()

SELECT LAST.tag
CASE 0
PRINT " Click sur Panel"
CASE 1
PRINT " Click sur Button"
END SELECT

END

Version LinuxMint 13 (1.6.1-1+maya-mate(32-bit)) LTS Noyau 3.14.33-031433-generic (27-02-2015)
LinuxMint 13 Mate Fr ICI, LinuxMint 17 Mate Fr LÀ.
Programmation Gambas3 Installé depuis la Console Terminal avec successivement: Les 3 Lignes sudo en Gras ci-dessous...
sudo add-apt-repository ppa:gambas-team/gambas3
sudo apt-get update
sudo apt-get install gambas3 -y
Gambas3.8.4-57.47 (Mise à Jour Auto via mintupdate le 28-01-2016)
Pour la Doc, c'est vers là: Documentation Gambas3 FR
décapode#5 Posté le 24/11/2013 à 09:28:10
C'est le pied, t'es une pointure Reivillo :lol!:
gambix#6 Posté le 24/11/2013 à 14:13:00
Faire simple !test
Moins de texte dans une signature c'est agrandir son espace.
1