WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
LABEL - Les propriétés
LES PROPRIETES DU LABEL


mylabel.png


Au travers de cette petite application en exemple je vous propose de découvrir les propriétés du label avec quelques petits exemples de code en illustration .

TELECHARGER L'APPLICATION

Code source :
' Gambas class file

PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()
ME.Center
END

PUBLIC SUB bquit_Click()
ME.Close
END

PUBLIC SUB Button1_Click()
Label1.X = Label1.X + 4
END

PUBLIC SUB Button2_Click()
Label1.X = Label1.X - 4
END

PUBLIC SUB Button4_Click()
Label1.y = Label1.y + 4
END

PUBLIC SUB Button3_Click()
Label1.y = Label1.y - 4
END

PUBLIC SUB Button5_Click()
Label1.Width = Label1.Width - 4
END

PUBLIC SUB Button6_Click()
Label1.Width = Label1.Width + 4
END

PUBLIC SUB Button7_Click()
Label1.Height = Label1.Height - 4
END

PUBLIC SUB Button8_Click()
Label1.Height = Label1.Height + 4
END

PUBLIC SUB CheckBox1_Click()
SELECT CASE Label1.Visible
CASE TRUE
Label1.Visible = FALSE
CASE FALSE
Label1.Visible = TRUE
END SELECT
END

PUBLIC SUB Button9_Click()
Label1.ToolTip = TextBox1.Text
END

PUBLIC SUB Button10_Click()
Label1.Text = TextBox2.text
END

PUBLIC SUB ColorChooser1_Change()
Label1.Background = ColorChooser1.Value
END

PUBLIC SUB ComboBox1_Change()
Label1.Mouse = ComboBox1.Text
END

PUBLIC SUB ComboBox2_Change()
Label1.Border = ComboBox2.Text
END

PUBLIC SUB FontChooser1_Change()
Label1.Font = Font[FontChooser1.Value]
END

PUBLIC SUB Label1_Drop()
Label1.Text = TextBox3.Text
END

PUBLIC SUB TextBox3_Drag()
LAST.Text = TextBox3.Text
END

A bientôt
cool


Date de création : 03/05/2011 @ 22:55
Dernière modification : 03/05/2011 @ 22:58
Catégorie : LABEL
Page lue 2628 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article

Personne n'a encore laissé de commentaire.
Soyez donc le premier !


ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^