Discussion :

[dany13]

Bonsoir,

je tombe sur un souci qui n'est pas compliqué mais dont je ne sais pas comment m'en sortir.

Je souhaiterai parametrer la couleur de fond d'une cellule et cette couleur est contenue dans une base de données HF.

Si je mets directement le code suivant ça fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TABLE_matable[1][2]..CouleurFond = RVB(255,2,255)

Mais si je récupère cette valeur de couleur dans ma base comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
PROCEDURE FN_CouleurFdEtat(nIdEtat)
sCouleurFdEtat est une chaîne =""
HLitRecherchePremier(ETAT,IDETAT,nIdEtat)
SI HTrouve(ETAT) ALORS
	sCouleurFdEtat = ETAT.CODE_COULEUR
FIN
RENVOYER sCouleurFdEtat
TABLE_matable[1][2]..CouleurFond = FN_CouleurFdEtat(REQ_mesdonnees.ID_ETAT)

ça ne fonctionne pas!!

Le problème vient du fait qu'il me recupere la valeur avec des guillemets comme si c'etait une chaine "RVB(255,255,255)" et non l'interpretation de la couleur qu'il devrait en faire...

Comment puis je faire pour qu'il m'interprete la valeur qu'il recupere au lieu de l'interpreter comme une chaine de caractère?

Merci pour vos lumières

[laurent30s]

Sous quel format tu as sauvegardé la couleur dans la base ?
Apparemment c'est une chaîne mais il faudrait que tu nous donnes un exemple pour qu'on puisse te répondre...

[themayu]

Bonsoir,

RVB() est une fonction qui renvoie un entier, c'est ce dernier que vous devez stocker dans votre base de donnée.

Pour que votre fonctionne, et si l'expression renvoyée par "ETAT.CODE_COULEUR" est "RVB(255,2,255)" vous pouvez utiliser quelque chose comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
PROCEDURE FN_CouleurFdEtat(nIdEtat)
sCouleurFdEtat est une chaîne =""
HLitRecherchePremier(ETAT,IDETAT,nIdEtat)
SI HTrouve(ETAT) ALORS
	sCouleurFdEtat = ETAT.CODE_COULEUR
FIN
RENVOYER ExécuteCode("RENVOYER " + sCouleurFdEtat)
------------
TABLE_matable[1][2]..CouleurFond = FN_CouleurFdEtat(REQ_mesdonnees.ID_ETAT)

"ExécuteCode("RENVOYER " + sCouleurFdEtat)" aura pour effet d'exécuter la fonction RVB et de vous renvoyer un entier, mais ça revient à tuer une mouche avec un porte avion !

La bonne solution consiste quand même à stocker la valeur de la couleur dans votre base de donnée, soit un entier !!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
PROCEDURE FN_CouleurFdEtat(nIdEtat)
HLitRecherchePremier(ETAT,IDETAT,nIdEtat)
SI HTrouve(ETAT) ALORS
	RENVOYER ETAT.CODE_COULEUR
SINON
	RENVOYER -1   // -1 vous permet de laisser la couleur par défaut du champ
FIN
 
TABLE_matable[1][2]..CouleurFond = FN_CouleurFdEtat(REQ_mesdonnees.ID_ETAT)

[Hemgé]

Bonsoir,

..CouleurFond attend non pas une chaîne, mais un entier et le résultat de RVB est un entier.

Pourquoi codez-vous une fonction qui renvoie une chaîne ?
Qu'avez-vous été stocker dans votre base ?


Hemgé

[dany13]

Merci Hemgé, themayu etlaurent30s pour vos élément de réponse.
Dans la base de données, dans mon champ CODE_COULEUR je mets effectivement la donnée comme ceci : RVB(255,255,255) par exemple.

Vous me conseillez donc de mettre l'entier qui correspond a RVB(255,255,255) dans le champ de la base de données ?

Je vais tester cela et je vous tiens au courant!
Merci pour vos lumières

[dany13]

Merci à vous c'est nickel, ça fonctionne