Remplir un MSHFlexgrid rapidement

Salut,

Voila dans une appli j'ai besoin de remplir un MSHflexgrid avec plus de 8500 lignes... Pour le moment j'utilise à peu près ça

for i = 0 to 8500
MSHflexgrid.addItem Table(i)
next

Mon problème est que ça prend entre 30s et 45s suivant le PC pour éxécuter cette boucle....

Est ce qu'il y a un moyen de remplir le flexgrid d'une manières plus rapide???

labout
essaie

for i=0 to 8500
MSHflexgrid.Textmatrix(i,0)=Table(i)
next

@+

Merci


Ca marche nickel... 1 seconde de temps de traitements, c'est les utilisateurs qui vont être heureux...