Threading mit exit event

  • VB.NET
  • .NET (FX) 3.0–3.5

Es gibt 8 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

    Threading mit exit event

    Hi,

    ich versuche gerade ein event einzubauen in mein code dieser soll mir dann sagen wann der thread fertig ist und dann soll in dem event eine einspeisung in eine LVW geschehen.

    Den code habe ich von der MS seite msdn.microsoft.com/de-de/library/Bb979513.aspx
    er geht auch ohne probleme halt nur das mit dem event bekomme ich nicht hin. im event wenn er versucht auf die lvw zuzu greifgen gibs fehler.

    ->
    Ein Ausnahmefehler des Typs "System.InvalidOperationException" ist in System.Windows.Forms.dll aufgetreten.

    Zusätzliche Informationen: Ungültiger threadübergreifender Vorgang: Der Zugriff auf das Steuerelement ListView1 erfolgte von einem anderen Thread als dem Thread, für den es erstellt wurde.

    Spoiler anzeigen

    VB.NET-Quellcode

    1. Public MustInherit Class ThreadWrapperBase
    3. Public Shared Event Completed()
    5. ' Dies ist der Thread, in dem der Task ausgeführt wird.
    6. Public ReadOnly Thread As System.Threading.Thread
    8. Public Sub New()
    9. ' Thread erstellen.
    10. Me.Thread = New System.Threading.Thread(AddressOf Me.StartTask)
    11. End Sub
    13. ' Den Task im Arbeits-Thread starten.
    14. Public Overridable Sub Start()
    15. Me.Thread.Start()
    16. End Sub
    18. ' Den Task durch einen Abbruch des Threads stoppen.
    19. ' Sie können diese Methode überschreiben, um stattdessen
    20. ' eine ordentliche Stopp-Anforderung zu verwenden.
    21. Public Overridable Sub [Stop]()
    22. Me.Thread.Abort()
    23. End Sub
    25. ' Den Status des Tasks überwachen.
    26. Private _IsCompleted As Boolean
    28. Public ReadOnly Property IsCompleted() As Boolean
    29. Get
    30. Return _IsCompleted
    31. End Get
    32. End Property
    34. Private Sub StartTask()
    35. _IsCompleted = False
    36. DoTask()
    37. _IsCompleted = True
    38. RaiseEvent Completed() 'Fehler
    39. End Sub
    41. ' Diese Methode enthält den Code, der die eigentliche Aufgabe ausführt.
    42. Protected MustOverride Sub DoTask()
    43. End Class


    VB.NET-Quellcode

    1. WithEvents ThreadFertig As New Suchen
    3. Private Sub MBtn2_Click(sender As Object, e As EventArgs) Handles MBtn2.Click
    4. Dim a As New Suchen
    5. a.Start()
    6. End Sub
    8. Private Sub ThreadFertig_Completed() Handles ThreadFertig.Completed
    9. With ListView1
    10. .Items.Clear()
    11. For i = 0 To SenderlistAktuell.Tables("SenderOut").Rows.Count - 1
    12. Dim row As DataRow = SenderlistAktuell.Tables("SenderOut").Rows(i)
    13. Dim g As String = CStr(row("Provider"))
    15. .Groups.Add(New ListViewGroup(g, g)) 'Fehler
    16. .Items.Add(New ListViewItem(New String() {CStr(row("Sender")), CStr(row("Track"))}, .Groups(CStr(row("Provider"))))) 'Fehler
    17. Next
    18. .AutoResizeColumns(ColumnHeaderAutoResizeStyle.HeaderSize) 'Fehler
    19. End With
    20. End Sub



    Und keine Sprüche wie VB lernen oder Benutz irg. suche das wird gemeldet ! Sonst danke für richtige Hilfe!!!

    erst wollte ich die lösung schreiben, dann hab ich gesehen das die im obereren bereich des tuts vorkommt, welches du selber gepostet und offensichtlich nicht richtig durchgearbeitet hast.

    €dit, nachtrag: wenn du jemanden suchst der dir die tuts vorkaut dann meld dich mit ner preisvorstellung per pn.

    Vorher hatte ich es so

    VB.NET-Quellcode

    1. Me.Invoke(Sub() .Groups.Add(New ListViewGroup(g, g)))​


    Fehler-> Ein Ausnahmefehler des Typs "System.InvalidOperationException" ist in System.Windows.Forms.dll aufgetreten.

    Zusätzliche Informationen: Invoke oder BeginInvoke kann für ein Steuerelement erst aufgerufen werden, wenn das Fensterhandle erstellt wurde.

    Ich würde empfehlen, anstatt diesen workarounds einfach ​Async/Await zu nutzen. Dann brauchst du keine Klasse mehr - du machst einfach Await Task.StartNew(Sub() ...)​ bzw. ​Await Task(Of Bla).StartNew(Function() ...).

Facebook
Telefonspende