[FUNC] La couleur en en lettre
Posté : lun. 11 janv. 2010 16:05
Pour ceux qui ne connaissent pas leur code rvb par coeur, voici une petite fonction utile
pour coloriser n'importe quel contrôle.
Au lieu de :
vous pouvez faire :
Ajoutez là à votre UDF de fonctions personnelles et vous n'aurez plus jamais à vous soucier de
savoir le code d'une couleur de base à nouveau.
Si vous tapez une couleur qui n'est pas dans la fonction, le contrôle restera tout simplement noir.
Néanmoins, pour avoir accès à tous les codes simplement, il y'a l'excellent
gratuiciel La boîte à couleur http://pourpre.com/colorbox qui peut s'avérer beaucoup plus utile.
pour coloriser n'importe quel contrôle.
Au lieu de :
Code : Tout sélectionner
GuiCtrlSetColor(-1,0XFFFFFF)Code : Tout sélectionner
GuiCtrlSetColor(-1,color("blanc"))Ajoutez là à votre UDF de fonctions personnelles et vous n'aurez plus jamais à vous soucier de
savoir le code d'une couleur de base à nouveau.
Si vous tapez une couleur qui n'est pas dans la fonction, le contrôle restera tout simplement noir.
Néanmoins, pour avoir accès à tous les codes simplement, il y'a l'excellent
gratuiciel La boîte à couleur http://pourpre.com/colorbox qui peut s'avérer beaucoup plus utile.
Code : Tout sélectionner
Func Color($color)
If $color = "white" Or $color = "blanc" Then Return "0XFFFFFF" ; Blanc
If $color = "black" Or $color = "noir" Then Return "0X000000" ; Noir
If $color = "red" Or $color = "rouge" Then Return "0XFF0000" ; Rouge
If $color = "blue" Or $color = "bleu" Then Return "0X0000FF" ; Bleu
If $color = "Orange" Then Return "0XFF8000" ; Orange
If $color = "green" Or $color = "vert" Then Return "0X00FF00" ; vert
If $color = "yellow" Or $color = "jaune" Then Return "0XFFFF00" ; jaune
If $color = "rose" Then Return "0XFE6D9F" ; rose
If $color = "gray" Or $color = "gris" Then Return "0X606060" ; gris
Return -1
EndFunc
