2 threads pose probléme

Version imprimable

07/01/2012, 16h13
gastoncs

2 threads pose probléme

Bonjour,
j'ai un form qui reçoit des données par un port série et les affiche dans une textbox,pour cela j'utilise

Code:

DataReceived

de serialport

j'ai vu sur msdn que à la reception de donnée avec datareceived celui ci crée un thread,

Dans cette même form j'ai inséré un

Code:

BackgroundWorker

qui déclenche le traitement des opérations à la réception des données.

le soucis c'est que lorsque je reçois les données dans la textbox par le port série et que le BackgroundWorker s'éxecute, l'application ne répond plus.

Alors que si je fait un copier/coller de mes données dans la textbox destiné à recevoir les données la le BackgroundWorker s’exécute correctement.

de ce fait je m'interroge si 2 threads peuvent fonctionné en meme temps (celle du DataReceived et celle du BackgroundWorker)
???
09/01/2012, 08h19
asmduty

Bonjour,

oui les deux threads fonctionnent normalement en même temps (ou alternativement)
Peut-on voir comment tu as mis ça en place au niveau du code ?

oui voici mon code,

au changement de texte dans la textbox1 j'ai ceci :

Code:

1
2
3
4
 
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
 BackgroundWorker1.RunWorkerAsync() 'ici je lance la lecture du son dans le thread
End sub

ensuite mon backgroundworker1 :

Code:

1
2
3
4
5
6
7
8
9
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        My.Computer.Audio.Play(salerte, AudioPlayMode.WaitToComplete)
        Dim k As Integer
        For k = 0 To tab.Length - 1
            If tab(k) <> "" Then
                dispositif_depart(tab(k))
            End If
        Next k
    End Sub

ma fonction dispositif_depart() au cas ou :

Code:

1
2
3
4
5
6
7
8
9
Sub dispositif_depart(ByVal vehicule As String) 'declenche le son qui correspand au vehicule
        Select Case vehicule
            Case vsav1 'variables définit dans Module1.vb
                My.Computer.Audio.Play(svsav1, _
        AudioPlayMode.WaitToComplete)
            Case vsav2
.......
End select
End sub

10/01/2012, 09h52
asmduty

Le problème ne vient visiblement pas de là mais de ton code concernant la réception des données par la port série.