OVH Cloud OVH Cloud

Définir des couleurs personnalisées.

1 réponse
Avatar
Vincent Dartois
Bonjour,

Je voudrais pouvoir définir des couleurs personnels pour pouvoir les
utilisés plus rapidement dans mon projet afin de ne pas cherché sans arrêt
quel est la couleur à utilisé pour tel cas.

Pour les utiliser comme suit :
--
Select case MaVariable
case 2
MaRecept.style.backColor = StadeColor.Qualification
case 3
MaRecept.style.backColor = StadeColor.Proposition
case 4
MaRecept.style.backColor = StadeColor.Negociation
end select
--

ainsi je defini pour qualification une couleur personnalisé, de même pour
proposition et negociation.

J'ai essayé de différente manière mais je me suis retrouvé à chaque fois au
moment de l'affectation de :
"MaRecept.style.backColor = StadeColor.Qualification" par un message :
Une valeur de type 'xxxxxxxxx.StadeColor' ne peut pas être convertie en
'System.Drawing.Color'

ceci me permettrai de gérer plus facilement mes couleurs pour des
signaletiques dans mes cellules de grilles.

Merci.

1 réponse

Avatar
Vincent Poyo
Imports System.DrawingPublic Class StadeColor

Public Shared Qualification As Color = Color.Red

Public Shared Proposition As Color = Color.FromName("Window")

Public Shared Negociation As Color = Color.FromArgb(200, 45, 69)

End Class