[vb6] chargement rapide d'un flexGrid

chargement rapide d'un flexGrid [vb6] - VB/VBA/VBS - Programmation

Marsh Posté le 29-05-2004 à 13:02:37    

bonjour!
 
J'ai dans une de mes forms un flexgrid qui se remplit des noms de fichiers d'un repertoire défini et dispose d'autres colonnes allant chercher d'autres informations (se basant sur le nom du fichier de la la ligne) dans un .ini mais le problème c'est que c'est trés long (surtout que le reptoire contient près de 1000 fichiers).
 
J'utilise ce code pour le remplissage du flexgrid :
 

Code :
  1. Set sf = fs.getfolder("c:\rep" ).Files
  4. For Each f1 In sf
  6.     If f1.name <> "Desktop.ini" And f1.name <> "desktop.ini" Then
  9.         form2.medialist.Rows = z + 1
  10.         form2.medialist.Row = z
  12.         form2.medialist.Col = 0
  13.         Set form2.medialist.CellPicture = form2.icone_medias_pic.Picture
  15.         form2.medialist.Col = 1
  16.         form2.medialist.Text = DelMediaExtension(f1.name)
  17.         form2.medialist.CellAlignment = flexAlignCenterLeft
  19.         form2.medialist.Col = 2
  20.         Set form2.medialist.CellPicture = LoadPicture(head2_folder_picture)
  21.         form2.medialist.Text = ini(workfolder, namedir, "", App.Path & "\" & inifile)
  22.        
  24.         [...]
  27.     End If
  28.    
  29. Next


 
Comment à votre avis je pourrai diminuer ce temps de chargement du flexgrid


Message édité par fils_de_la_lumiere le 29-05-2004 à 13:04:03
Reply

Marsh Posté le 29-05-2004 à 13:02:37   

Reply

Marsh Posté le 30-05-2004 à 01:57:39    

up

Reply

Marsh Posté le 31-05-2004 à 21:04:40    

au lieu de positionner le focus et d'utiliser .Text, tu peux utiliser .TextMatrix(,) qui est beaucoup plus rapide...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed