Portos67
Messages postés72Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention14 janvier 2013
-
31 mars 2009 à 23:26
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
1 avril 2009 à 16:38
Bonsoir,
Bah voila mon soucis, c'est que lorsque je lance un scan du disque dur pour rechercher un dossier spécifique, je voudrais lancer un .gif en même temps. Le hic c'est que le .gif se bloque, ce qui est tout à fait logique, et donc je voulais mettre mon .gif dans un thread différent.... Et la encore ca ne veut pas le .gif bloque toujours, si quelqu'un peut me dire ou j'ai fait l'erreur merci.
Voici mon code dans la form :
Private Sub Button12_Click.......
thread1.Start()
// mon code de recherche de dossier ici
End Sub
voici le code dans la class :
Public thread1 As New Thread(AddressOf Showgif)
Sub Showgif()
Configurateur.PictureBox19.Show()
End Sub
Portos67
Messages postés72Date d'inscriptionvendredi 25 février 2005StatutMembreDernière intervention14 janvier 20131 1 avril 2009 à 16:33
Voila la fonction que j'utilise :
Public Function recherche(ByVal dossier As String, ByVal disque As String)
Dim Find As New clsFind
Dim I As Integer
Configurateur.Button12.Enabled = False
Find.WithSubFolder = True
Find.Path = disque
Find.FileType = dossier
System.Windows.Forms.Application.DoEvents()
Find.Search()
System.Windows.Forms.Application.DoEvents()
If Find.NumFiles > 0 Then
For I = 1 To Find.NumFiles
System.Windows.Forms.Application.DoEvents()
Configurateur.ListBox1.Items.Add(Find.GetFile(I))
Next I
Else
End If
Find = Nothing
Configurateur.ListBox1.Refresh()
Configurateur.Button12.Enabled = True
End Function
Vous n’avez pas trouvé la réponse que vous recherchez ?