ColorRequester()

Syntaxe

Couleur = ColorRequester([CouleurActuelle])

Ouvre une boîte de dialogue standard pour choisir une couleur. La couleur sélectionnée est renvoyée dans Couleur sous la forme d'une valeur 24 bits (3 octets) dont chaque octet contient la valeur de chacune des composantes Rouge, Vert et Bleu. Pour récupérer facilement la valeur de chacune des composantes, les commandes Red(), Green() et Blue() sont diponibles. Si l'utilisateur choisit le bouton <Annuler> de la boîte de dialogue, la valeur retournée est -1. Le paramètre optionnel 'CouleurActuelle' peut être utilisé pour indiquer la couleur par défaut lors de l'ouverture de la boîte.

Exemple

  Couleur.l = ColorRequester()
  If Couleur > -1
    a$ = "Vous avez sélectionné la couleur suivante:" + Chr(10)  ; Chr(10) est seulement nécessaire
    a$ + "Valeur 24 Bits: " + Str(Couleur)              + Chr(10)  ; pour les retours à la ligne
    a$ + "Composante rouge:    " + Str(Red(Couleur))    + Chr(10)
    a$ + "Composante verte:  " + Str(Green(Couleur))    + Chr(10)
    a$ + "Composante bleue:   " + Str(Blue(Couleur))
  Else  
    a$ = "La sélection a été annulée."
  EndIf
  MessageRequester("Information",a$,0)
  End

OS Supportés

Tous