GB3- Utiliser la colorpalette
La ColorPalette
A) Introduction
La colorpalette est un outils bien pratique pour accéder aux couleurs que vous utilisez souvent.
Vous pouvez importer cet outil depuis la catégorie Chooser en cliquant sur l'icone pipette :
B) Utilisation
Nous allons créer une petite application avec 3 widgets :
Une colorpalette : accès rapide aux couleurs
Un colorButton : Un bouton pour sélectionner une couleur
Un ColorChooser : Une palette complète pour sélectionner sa couleur
Pour ajouter une couleurà la colorpalette il suffit de saisir ce code :
ColorPalette1.Add(ColorButton1.Value)
ou pour ajouter la couleur en premier, ecrivez plutôt:
ColorPalette1.AddFirst(ColorButton1.Value)
Je n'ai pas trouvé le moyen d'effacer dans le code la couleur , mais il suffit de cliquer droit sur la couleur que vous voulez supprimer et un menu vous permet de l'effacer.
Pour récupérer la couleur sélectionnée, il suffit de saisir :
Dim Mycolor As Integer Mycolor = ColorPalette1.Current
Voici le code de l'application :
Public Sub Form_Open() Me.Center() End Public Sub bquit_Click() Me.Close() End Public Sub badd1_Click() ColorPalette1.Add(ColorButton1.Value) End Public Sub badd2_Click() ColorPalette1.AddFirst(ColorChooser1.Value) End
Merci pour votre attention