GB3- Utiliser la colorpalette
La ColorPalette
![](../../../img/colorpalette/color.jpg)
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 :
![](../../../img/colorpalette/widget.jpg)
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