begin process at 2012 02 15 08:41:31
  Trouver un code source :
 
dans
 
Accueil > Forum > 

VB.NET et VB 2005

 > 

Windows

 > 

Formulaire / Winforms / Controls

 > 

Couleur depuis une String ou autre source


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Couleur depuis une String ou autre source

vendredi 18 mai 2007 à 10:25:14 | Couleur depuis une String ou autre source

Morveus

Bonjour!

Je développe actuellement une application qui permet de gérer des stocks de serveurs à installer, donc les pièces détachées sont enregistrées dans une base de données Access, mais que j'ai générée à partir d'une base XLS. Dans le fichier XLS, il y avait des codes de couleurs, mais il n'est pas possible de les garder dans Access (du moins, pas en temps normal).
Ma base de données Access, je l'affiche dans des DataGridView, et je sais colorer des cellules du DataGridView.

J'ai donc créé une table dans ma base de données Access que j'ai appelé "STYLE". Cette table contient des chaines de caractères, qui sont:
- Couleur,
- Police,
- Style (souligné, gras...),

ainsi qu'une valeur "Table", et pour finir "Ligne" et "Colonne".

Je vous donne un exemple: le serveur "PLOP" contient une blade à changer. Dans la table "SERVEURS", à la ligne 0 et à la colonne 4, j'aimerais donc que la cellule soit Rouge (Red).

Dans ma table "STYLE", j'ai donc comme données:

Table: "SERVEURS"
Ligne: 0
Colonne: 4
Couleur: Red
Police: Rien
Style: Rien

Maintenant, dans Visual Basic, j'ai réussi à faire correspondre toutes ces données, et a extraire les seulement les informations dont j'avais besoin (mettons uniquement Couleur, puisqu'ici Police et Style sont nulles). Mon problème, qui va surement vous sembler tout bête, c'est qu'une fois que j'ai extrait les informations de style, je n'arrive pas à les affecter à des propriétés.
Prenons par exemple un label (au lieu d'une cellule du DataGridView):
je récupère la valeur "Red" dans une variable "CouleurLabel", je veux affecter cette CouleurLabel à la propriété ForeColor de mon Label que j'ai appelé "Test".

Si je fais:

Test.ForeColor = CouleurLabel

Ca ne marche pas (ce qui est logique, puisqu'il attend une donnée du type "COLOR" et pas une String!)

Quelqu'un pourrait-il me sauver la vie?

Merci d'avance!
vendredi 18 mai 2007 à 10:38:40 | Re : Couleur depuis une String ou autre source

fred.toto

Réponse acceptée !

Salut!
voici un rappel de correspondances des couleurs sous Excel, ça peut peut-etre t'aider:
' ******************************************************************
'   Rappel Couleurs / Codes Couleur
' ******************************************************************

    GtTableauColors(0, 0).sNom = "Noir"
    GtTableauColors(0, 0).lIndice = 1
   
    GtTableauColors(0, 1).sNom = "Marron"
    GtTableauColors(0, 1).lIndice = 53
   
    GtTableauColors(0, 2).sNom = "Vert Olive"
    GtTableauColors(0, 2).lIndice = 52
   
    GtTableauColors(0, 3).sNom = "Vert foncé"
    GtTableauColors(0, 3).lIndice = 51
   
    GtTableauColors(0, 4).sNom = "Bleu-vert foncé"
    GtTableauColors(0, 4).lIndice = 49
   
    GtTableauColors(0, 5).sNom = "Bleu foncé"
    GtTableauColors(0, 5).lIndice = 11
   
    GtTableauColors(0, 6).sNom = "Indigo"
    GtTableauColors(0, 6).lIndice = 55
   
    GtTableauColors(0, 7).sNom = "Gris-80%"
    GtTableauColors(0, 7).lIndice = 56
   
    GtTableauColors(1, 0).sNom = "Rouge foncé"
    GtTableauColors(1, 0).lIndice = 9
   
    GtTableauColors(1, 1).sNom = "Orange"
    GtTableauColors(1, 1).lIndice = 46
   
    GtTableauColors(1, 2).sNom = "Marron clair"
    GtTableauColors(1, 2).lIndice = 12
   
    GtTableauColors(1, 3).sNom = "Vert"
    GtTableauColors(1, 3).lIndice = 10
   
    GtTableauColors(1, 4).sNom = "Bleu-vert"
    GtTableauColors(1, 4).lIndice = 14
   
    GtTableauColors(1, 5).sNom = "Bleu"
    GtTableauColors(1, 5).lIndice = 5
   
    GtTableauColors(1, 6).sNom = "Bleu-gris"
    GtTableauColors(1, 6).lIndice = 47
   
    GtTableauColors(1, 7).sNom = "Gris-50%"
    GtTableauColors(1, 7).lIndice = 16
   
    GtTableauColors(2, 0).sNom = "Rouge"
    GtTableauColors(2, 0).lIndice = 3
   
    GtTableauColors(2, 1).sNom = "Orange clair"
    GtTableauColors(2, 1).lIndice = 45
   
    GtTableauColors(2, 2).sNom = "Citron clair"
    GtTableauColors(2, 2).lIndice = 43
   
    GtTableauColors(2, 3).sNom = "Vert marin"
    GtTableauColors(2, 3).lIndice = 50
   
    GtTableauColors(2, 4).sNom = "Vert d'eau"
    GtTableauColors(2, 4).lIndice = 42
   
    GtTableauColors(2, 5).sNom = "Bleu clair"
    GtTableauColors(2, 5).lIndice = 41
   
    GtTableauColors(2, 6).sNom = "Violet"
    GtTableauColors(2, 6).lIndice = 13
   
    GtTableauColors(2, 7).sNom = "Gris-40%"
    GtTableauColors(2, 7).lIndice = 48
   
    GtTableauColors(3, 0).sNom = "Rose"
    GtTableauColors(3, 0).lIndice = 7
   
    GtTableauColors(3, 1).sNom = "Jaune d'or"
    GtTableauColors(3, 1).lIndice = 44
   
    GtTableauColors(3, 2).sNom = "Jaune"
    GtTableauColors(3, 2).lIndice = 4
   
    GtTableauColors(3, 3).sNom = "Vert brillant"
    GtTableauColors(3, 3).lIndice = 6
   
    GtTableauColors(3, 4).sNom = "Turquoise"
    GtTableauColors(3, 4).lIndice = 8
   
    GtTableauColors(3, 5).sNom = "Bleu ciel"
    GtTableauColors(3, 5).lIndice = 33
   
    GtTableauColors(3, 6).sNom = "Prune"
    GtTableauColors(3, 6).lIndice = 54
   
    GtTableauColors(3, 7).sNom = "Gris-25%"
    GtTableauColors(3, 7).lIndice = 15
   
    GtTableauColors(4, 0).sNom = "Rose saumon"
    GtTableauColors(4, 0).lIndice = 38
   
    GtTableauColors(4, 1).sNom = "Brun"
    GtTableauColors(4, 1).lIndice = 40
   
    GtTableauColors(4, 2).sNom = "Jaune clair"
    GtTableauColors(4, 2).lIndice = 36
   
    GtTableauColors(4, 3).sNom = "Vert clair"
    GtTableauColors(4, 3).lIndice = 35
   
    GtTableauColors(4, 4).sNom = "Turquoise clair"
    GtTableauColors(4, 4).lIndice = 34
   
    GtTableauColors(4, 5).sNom = "Bleu moyen"
    GtTableauColors(4, 5).lIndice = 37
   
    GtTableauColors(4, 6).sNom = "Lavande"
    GtTableauColors(4, 6).lIndice = 39
   
    GtTableauColors(4, 7).sNom = "Blanc"
    GtTableauColors(4, 7).lIndice = 2

Donc maitenant à toi de faire correspondre le RED ou rouge avec la couleur 3 :)

Bon Courage. Fred.

vendredi 18 mai 2007 à 10:59:31 | Re : Couleur depuis une String ou autre source

Morveus

Merci à toi ! :D



Cette discussion est classée dans : base, table, données, style, couleur


Répondre à ce message

Sujets en rapport avec ce message

Recherche dans une base de données [ par Hattem ] J'ai crée une base de données eleve à l'aide de l'ACCESS dans laquelle il y a deux tables : Table identification indexé sur le matricule et une table Base de données - Table vide [ par Filou ] J'ai un super trou de mémoire : comment on vérifie si une table ou une requête est vide ? comment copier une table d'une base de données access vers une table d'une base de données oracle via vb [ par jiraf ] comment copier une table d'une base de données access vers une table d'une base de données oracle via vb copier une table access vers une table d'une base de données oracle via VB urgent? [ par jiraf ] j'ai fait le code d'insertion des enregistrements d'une table Access vers une table d'une base de données Oracle via VB mais il me signale une erreur copier une table d'une base de données access vers une table d'une base de données oracle via VB?urgent?urgent?urgent? [ par jiraf ] j'ai ecrit le code d'insertion d'une table access vers une table d'une base de données oracle via VB mais il me signale une erreur "ODBC--échec d'inse base de données [ par antho ] salut à tous, je viens de me mettre à la réalisation d'une bd et je n'arrive pas à écrire un code modifiant la couleur d'un bouton de commande en fon Comment effacer l'intégralité du contenu d'une table de base de données? [ par sylfau ] Bjr,J'utilise ADO sur VB6 et je souhaites effacer l'intégralité du cotenu d'une table d'une base de données de type access 2000.Après avoir déclarer A Gestion de base de données Access [ par Boris88 ] Je suis débutant et je réalise un jeu en VB. Je doit lire, des données dans une table. Celles-ci sont susceptibles d'être modifiées et doivent ecraser HELP!!!! Parcourir une base de données[}:)] [ par yomm ] Voilà je souhaite pouvoir parcourir une base de données mais simplement au niveau du nom des table ki si trouveen gros, j'ai une table "sommaire" des


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 6,427 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales