[VB.Net] Funzione ricorsiva in un thread separato

[.:Francesco 96:]

Ho una funzione ricorsiva che scansiona tutti i file del pc. Fa impallare il mio programma quindi dovrei far fare questa ricerca su un thread separato o dovrei utilizzare una funzione che faccia la ricerca utilizzando dei cicli for... next (ma è molto difficile) e utillizzare il controllo background worker.
Grazie, ...

[Stoicenko]

E dov'è il problema?

[oregon]

Originariamente inviato da .:Francesco 96:
... quindi dovrei far fare questa ricerca su un thread ...

E quindi? Perche' non lo fai? Qual e' la domanda?

[eltarion]

Ti conviene dare un'occhiata qui
Gestione Thread

In sostanza dichiari un thread come nuovo thread e passi al costruttore il nome della funzione che sarà eseguita dal thread

Dim t as new System.threading.Thread(AddressOf ThreadProc)

Dopodichè lanci semplicemente il thread

t.Start()

Devi poi stare attento alla concorrenza sulle risorse però.

Ciau

[gibra]

Bisogna anche analizzare il perchè impalla il programma.
Forse è scritta male, ed allora a che servirebbe un thread separato?

Ma senza vederla...

[oregon]

Originariamente inviato da gibra
Bisogna anche analizzare il perchè impalla il programma.

Molto probabilmente, se la ricerca è molto pesante e avviene nell'unico thread del programma, è l'interfaccia dello stesso programma a bloccarsi (naturalmente).

Non penso tutto il PC ... anche se un'attività pesante sul disco, lo rallenta in generale ...

[eltarion]

Credo che gli impalli il programma perchè non appena entra in quella funzione ci rimane per un bel po' bloccando quindi l'esecuzione del programma "principale". Comunque in effetti vedendo la funzione potremmo capirci di più ^^

Ciau

[.:Francesco 96:]

Ecco parte del codice:

Try
Dim ListVoice As ListViewItem

Dim x As New DirectoryInfo(Path)
Dim y1 As FileInfo
Dim y2 As DirectoryInfo
Dim z1 As FileInfo() = x.GetFiles()
Dim z2 As DirectoryInfo() = x.GetDirectories()

For Each y1 In z1
ListVoice = ListView1.Items.Add(y1.Name)
Next y1

If z2.Count > 0 Then

For Each y2 In z2
FindFile(Path & "\" & y2.Name)
Next y2

End If

Catch ex As Exception
MessageBox.Show(ex.Message, "Errore", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try

Si, si impalla l'interfaccia grafica del programma.

[oregon]

Originariamente inviato da .:Francesco 96:
Si, si impalla l'interfaccia grafica del programma.

Come ti dicevo, è normale. Come hai detto tu all'inizio della discussione, devi usare un altro thread.

[.:Francesco 96:]

Mi date una mano? Non so da dove iniziare! Come creo e uso un nuovo thread?