Discussion :

[gastoncs]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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)
???

[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 ?

[gastoncs]

oui voici mon code,

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[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.