TABSTRIP - Notions essentielles
Rédigé par spheris
Aucun commentaire
Classé dans : apprentisssage, gambas 2, gambas 3, Tabstrip, Tutoriel

Bonsoir,
Dans cette petite application à titre d 'exemple je vous propose de découvrir comment :
1)AJOUTER UN ONGLET
1)AJOUTER UN ONGLET
Il suffit d 'utiliser d 'ajouter un onglet de plus au nombre existant en saisissant ceci :
Tabstrip1.Count = Tabstrip1.count + 1
2) RENOMMER L 'ONGLET COURANT
par la commande :
Tabstrip[index de l 'onglet courant].text = nouveau texte
Dans l 'exemple , payons-nous le luxe de le modifier au travers d 'une INPUTBOX comme ceci :
3) CHOISIR L 'EMPLACEMENT DE VOS ONGLETS
DIM mybox AS String mybox = InputBox( Entrez le nom de l 'onglet. ) TabStrip1[TabStrip1.Index].Text = mybox
3) CHOISIR L 'EMPLACEMENT DE VOS ONGLETS
par la propriété Orientation
2 radioboutons ont été mis pour l 'application.
Je vous laisse découvrir l 'exemple :
TELECHARGER L 'EXEMPLE ICI
Pour finir, voici le code source de l 'application :
PUBLIC SUB _new() END PUBLIC SUB Form_Open() ME.Center END PUBLIC SUB bquit_Click() ME.Close END PUBLIC SUB radiotop_Click() TabStrip1.Orientation = 0 END PUBLIC SUB radiobottom_Click() TabStrip1.Orientation = 1 END PUBLIC SUB rentab_Click() DIM mybox AS String mybox = InputBox( Entrez le nom de l 'onglet. ) TabStrip1[TabStrip1.Index].Text = mybox END PUBLIC SUB addtab_Click() TabStrip1.Count = TabStrip1.Count + 1 END