PC SOFT

FOROS PROFESIONALES
WINDEV, WEBDEV y WINDEV Mobile

|
|
|
FR
Inicio → WINDEV 2024 → Table fichier agir sur une ligne
Table fichier agir sur une ligne
Iniciado por dfavier, 22,mar. 2006 16:48 - 4 respuestas
#1
Publicado el 22,marzo 2006 - 16:48
J'ai 2 tables T1 et T2

Je veux comparer toutes les lignes de T2 avec T1
Si l'enregistrement est présent dans T1
je veux modifier la couleur de la ligne T2 correspondante

merci d'avance

Daniel
#2
Publicado el 22,marzo 2006 - 17:38
Salut,

Essaie ce code :

I,Z,R sont des entiers; L est une chaîne
I=1; Z=TableOccurrence(T2)
TANTQUE I<Z

L=ColonneT2[I]
R=TableCherche(ColonneT1,L)
si R>0 ALORS T2[I]..CouleurFond=RVB(255,0,0)

I++
FIN

Est-ce que cela te suffit?
#3
Publicado el 22,marzo 2006 - 17:38
Bonjour,
Dans le code d'affichage d'une ligne de T2:
Si tablecherche(t1.Colonne,t2.colonne,vrai,1) <> -1 alors
// J'ai trouvé
MaTable.MaColonne[MaTable]..couleurfond = rouge
sinon
// J'ai pas trouvé
MaTable.MaColonne[MaTable]..couleurfond = idefaut
fin
#4
Publicado el 22,marzo 2006 - 17:52
Bonjour,

Je vous propose cette solution:

Nb, i est un entier
Res est un booléen

Nb = TableOccurence(T2)

POUR i=1 A Nb
Res = TableCherche(T1,T2[i],Vrai)
Si Res <> -1 ALORS
T2[i]..Couleur = iRougeClair
FIN
FIN

En espérant vous avoir aidé!!
Florence POUGET
#5
Publicado el 22,marzo 2006 - 18:43
Ca fonctionne parfaitement

Merci bcp.
Daniel
→ Volver a WINDEV 2024