tbl est un tableau de 6 chaînes
Ind est un entier
sVal est une chaîne
sMemo est une chaîne
tbl[1] = "a"
tbl[2] = "z"
tbl[3] = "e"
tbl[4] = "z"
tbl[5] = "r"
tbl[6] = "a"
TableauTrie( tbl, ttCroissant )
POUR TOUT ELEMENT sVal DE tbl
SI sVal <> sMemo ALORS
Ind ++
sMemo = sVal
FIN
FIN
Info(Ind)
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5192&post_id=21419