ThreadPool.QueueUserWorkItem / Tasks() - Warten bis alle Threads beendet

f0x · 18. Juni 2016, 01:35

Hallo,

wie kann ich den Programmablauf warten lassen, bis alle Threads aus dem Threadpool beendet sind?

VB.NET-Quellcode

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myStruct As structInput
For Each row As DataRow In dt.Rows
myStruct = New structInput
...
Dim w As Threading.WaitCallback = New Threading.WaitCallback(AddressOf bgw_DoWork)
Threading.ThreadPool.QueueUserWorkItem(w, myStruct)
Next
'--> Dieser Code sollte erst ausgeführt werden, wenn alle Threads beendet wurden
'--> Wird aber sofort ausgeführt
End Sub

--> Ich habe etwas über CountdownEvent gelesen aber ich hab nicht verstanden wie ich es imlementieren kann.

Einen zweiten Versuch mit TPL habe ich noch versucht:

VB.NET-Quellcode

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myStruct As structInput
Dim taskArray(dt.Rows.Count - 1) As Task
For Each row As DataRow In dt.Rows
myStruct = New structInput
...
taskArray(i) = Task.Factory.StartNew(Sub() bgw_DoWork(myStruct))
i += 1
Next
Task.WaitAll(taskArray)
'--> Dieser Code sollte erst ausgeführt werden, wenn alle Threads beendet wurden
End Sub

--> Hier wird zwar gewartet, dafür blockiert währenddessen aber auch die UI !?

Grüße.

~blaze~ · 18. Juni 2016, 10:42

Hi
hindert dich irgendwas an der Asynchronität der gesamten Routine? Rufe doch einfach die Methode auf, blockiere bis zum Abschluss die Gui oder so und führe die Aufgabe in einem weiteren Nebenthread aus (womöglich im Threadpool). Schau' dir übrigens auch mal die Parallel-Klasse an.

Das Problem rührt daher, dass die Gui über eine Nachrichtenschleife arbeitet. Bei jeder Interaktion (Keyboard, Maus, einige Events, wie Textänderung) mit ihr werden Events aufgerufen, in denen auch Benutzercode, wie Button.Click, ausgeführt wird. Jetzt wird die Nachrichtenschleife aber nicht weiter ausgeführt, bis das aktuelle Event abgearbeitet wird und danach geht es (mit Ausnahmen) mit der als nächstes eingereihten Nachricht weiter. Folglich blockiert der Vorgang, wenn er nicht asynchron abgearbeitet wird, da ja auch Maus und Tastatur darauf angewiesen sind.

Viele Grüße
~blaze~

ErfinderDesRades · 18. Juni 2016, 21:39

f0x schrieb:

wie kann ich den Programmablauf warten lassen, bis alle Threads aus dem Threadpool beendet sind?

Dafür gibts doch Parallel.For, odr?

thefiloe · 18. Juni 2016, 22:36

Bei 1000 Rows machst du 1000 Tasks. Da geht dir der Task mehr in die Performance als die Row selbst. Wie bereits gesagt wurde, wenn du auf einer entsprechenden Framework-Version bist Parallel.For bzw. Parallel.ForEach. Kann man auch über NuGet Paket noch nachziehen.
Ansonsten die Rows segmentieren und dann eine geringere Anzahl an Segmenten im ThreadPool verarbeiten. Warten bis alles fertig ist, kannste über WaitHandles.

~blaze~ · 19. Juni 2016, 00:09

Das sähe übrigens so oder so ähnlich aus:

VB.NET-Quellcode

'In Button.Click:
'Gui einfrieren
Freeze()
'Womöglich wäre ein eigener Thread aber angemessen, statt ThreadPool.QueueUserWorkItem
System.Threading.ThreadPool.QueueUserWorkItem(Sub(o)
Parallel.ForEach(rows, Sub(row, state, i)
'Hier die Abarbeitung von row (ist die Row am Index i - i ist ein Long! Ergo ggf. nach Integer konvertieren) durchführen
End Sub)
Me.BeginInvoke(New Action(AddressOf Unfreeze)) 'Gui entfrieren
End Sub
)

Es gilt noch, Routinen für Freeze und Unfreeze zu implementieren. Dort einfach Enabled, usw. setzen.

Viele Grüße
~blaze~

RodFromGermany · 19. Juni 2016, 09:28

@f0x Meinst Du so was:

VB.NET-Quellcode

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim tsk() = New Task(9) {}
For i = 0 To 9
Dim tt = New Task(AddressOf bla)
tsk(i) = tt
Next
Task.WaitAll(tsk) ' dies hier
End Sub
Private Sub bla()
' was tun
End Sub

ThreadPool.QueueUserWorkItem / Tasks() - Warten bis alle Threads beendet

ThreadPool.QueueUserWorkItem / Tasks() - Warten bis alle Threads beendet

VB.NET-Quellcode

VB.NET-Quellcode

f0x schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

5 Benutzer haben hier geschrieben