Discussion :

[gbrion]

Bonjour,

j'ai une Table Stock dans laquelle sont répertoriés les stocks de tous les produits. Pour chaque produit (donc ligne de la table), je souhaite changer la couleur d'une colonne précise suivant la valeur affichée : par défaut si 0, rouge si négative et bleu si positive.
J'utilise le code suivant mais il ne me donne pas satisfaction car cela entraîne un affichage très lent du contenu de la table, bloque l'application pendant quelques secondes et quelques fois la plante même carrément.

Code :

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

1
2
3
4
5
6
7
8
9
10
i est un entier=1
POUR i=1 A TableOccurrence(TABLE_Stock)
	SI TABLE_Stock.Difference[i]>0 ALORS
		TABLE_Stock.Difference[i]..Couleur=iMagentaFoncé
	SINON
		SI TABLE_Stock.Difference[i]<0 ALORS
			TABLE_Stock.Difference[i]..Couleur=iRougeClair
		FIN
	FIN
FIN

Quelqu'un aurait-il une autre idée de code ?

Merci d'avance.

[Jannus]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
i est un entier=1
POUR i=1 A TableOccurrence(TABLE_Stock)
	SELECT CASE TABLE_Stock.Difference[i]
                   CAS <0
		TABLE_Stock.Difference[i]..Couleur=iMagentaFoncé
                   CAS >0
		TABLE_Stock.Difference[i]..Couleur=iRougeClair
                   AUTRE CAS
                   CAS <0
		TABLE_Stock.Difference[i]..Couleur=iNoir
	FIN
FIN

Il faut aussi voir où tu implémentes ce code ?

[gbrion]

Dans <Affichage d'une ligne> dans le code de la Table

[Jannus]

Oupsssssssssssssssss

Donc à l'affichage de chaque ligne, il parcourt toute la table pour modifier la couleur d'affichage.
Normal que ce soit lent

Il faut mettre ce code après l'affichage complet de la table.

Quand j'ai besoin de ce genre de parcours, je fais une procédure et je l'appelle après chaque affichage.

[gbrion]

Merci pour tes conseils