Discussion :

[altahir007]

Bonjour,

J'ai un thread qui une fois un boolean Public à True se termine

Code :

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

1
2
    Public thread2 As Threading.Thread
    Public StopThreadSolenoidManagement As Boolean

Code :

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

1
2
3
4
5
6
7
    Public Sub SolenoidManagementThread()
 
        Do Until StopThreadSolenoidManagement = True
            ...'ici plein de code
        Loop
 
    End Sub

Pour le lancer, j'utilise dans une procédure :

Code :

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

1
2
3
4
5
                    If Start.thread2 Is Nothing Then
                        Start.thread2 = New Threading.Thread(AddressOf Start.SolenoidManagementThread)
                        Start.thread2.Start()
                        Start.thread2.Priority = Threading.ThreadPriority.Normal
                    End If

Malheureusement, ça ne fonctionne qu'une fois et ça ne me conviens pas vraiment ! j'ai vu que l'on peut mettre sur pause le thread mais dans mon cas, j'aimerai vraiment qu'il meurt et que je puisse le recréer mais comment faire. J'ai un peu cherché sur google mais je n'ai pas tout compris à vrai dire :/

[Rainui]

Bonjour,

Je ne suis pas habitué de l'utilisation de thread mais je pense qu'en implémentant INotifyPropertyChanged sur votre StopThreadSolenoidManagement vous devriez arriver à mettre votre thread en pose sans le détruire

Il ne suffirait plus qu'à déterminer la valeur de StopThreadSolenoidManagement et implémenter les actions à faire. Si = true, je redémare le thread et je fait ma boucle infinie, si = false, je met en pause le thread.

N'ayant pas testé la solution, je ne peux vous assurer qu'elle fonctionne.

[altahir007]

Je vais regarder de ce coté là, je ne trouve pas vraiment d'autre solution. Je reviens après pour le feedback

[altahir007]

Voilà ce que j'ai fait, ça fonctionne assez bien, je ne tue jamais mon thread, je dois réinitialiser les variables de mon code du thread par contre histoire que ça redemarre parfaitement

Code :

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

1
2
3
4
5
6
7
8
9
10
    Public Sub SolenoidManagementThread()
        Dim toggle As Boolean = False
        Do While 1 = 1
            wait(200)
            Do Until StopThreadSolenoidManagement = True
                ...'pas mal de code
            Loop
 
        Loop
    End Sub

[altahir007]

J'ai remplacé do while 1=1 par un boolean global pour tuer le thread avant de quitter l'application c'est un peu plus propre comme ça. Bonne année à tous