Discussion :

[sihammaster]

Bonjour à toutes et à tous,

j'aimerais utiliser les threads dans mon app et j'ai rencontré quelques difficultés,
en fait j'ai plusieurs fonctions je voudrais lancer une par une, une fonction ne devrait pas se lancer si l'autre n'a pas terminé le traitement.
voila ce que je fai jusqu'au moment:

Code :

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

1
2
3
4
 
        Dim myThread As Thread
        myThread = New Thread(AddressOf fonction1)
        myThread .Start()

je sais pas comment lancer plusieurs thread en respectant la fin de traitement d'une fonction
Merci de votre aide.

[Er3van]

Ca doit être un truc de ce goût là :

Code vb :

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

1
2
3
4
5
6
7
8
9
10
 
Dim myThread As Thread
myThread = New Thread(AddressOf fonction1)
myThread .Start()
myThread .Join()
myThread = New Thread(AddressOf fonction2)
myThread .Start()
myThread .Join()
myThread = New Thread(AddressOf fonction3)
myThread .Start()

[tomlev]

Ca doit être un truc de ce goût là :

Code vb :

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

1
2
3
4
5
6
7
8
9
10
 
Dim myThread As Thread
myThread = New Thread(AddressOf fonction1)
myThread .Start()
myThread .Join()
myThread = New Thread(AddressOf fonction2)
myThread .Start()
myThread .Join()
myThread = New Thread(AddressOf fonction3)
myThread .Start()

Euh... et c'est quoi l'intérêt d'utiliser des threads pour exécuter fonction1 et fonction2 alors ?

Autant faire ça :

Code vb :

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

1
2
3
4
5
6
 
fonction1()
fonction2()
Dim myThread As Thread
myThread = New Thread(AddressOf fonction3)
myThread .Start()

[Er3van]

Euh... et c'est quoi l'intérêt d'utiliser des threads pour exécuter fonction1 et fonction2 alors ?

A ce compte là, autant faire :
fonction1();
fonction2();
fonction3();

je voudrais lancer une par une, une fonction ne devrait pas se lancer si l'autre n'a pas terminé le traitement

On est bien d'accord que ça n'a aucun intéret en l'état, mais j'imagine que la problématique qui est derrière n'a pas été complètement expliquée.


J'imagine qu'en vrai ça serait plutôt :

Code vb :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim myThread As Thread
myThread = New Thread(AddressOf fonction1)
myThread .Start()
// do something 
myThread .Join()
myThread = New Thread(AddressOf fonction2)
myThread .Start()
// do something
myThread .Join()
myThread = New Thread(AddressOf fonction3)
myThread .Start()

[tomlev]

A ce compte là, autant faire :
fonction1();
fonction2();
fonction3();

Ben pas vraiment en fait... comme dans ton code tu n'avais pas mis de Join sur le dernier thread, j'ai laissé fonction3 dans un thread à part pour que ça s'exécute en background et qu'on attende pas la fin

[Er3van]

Ah oui en effet. Mea culpa.

[sihammaster]

Merci à Vous,
j'ai eu un probleme lors de l'execution de la premiere fonction, cette derniere serte à ouvrir des pages web dans des webbrowsers:
dans la ligne:

Code :

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

1
2
 
WebBrowser1.Navigate("http://www.developpez.net/forums/d1059710/dotnet/langages/vb-net/gestion-threads/")

Une exception non gérée du type 'System.Reflection.TargetInvocationException' s'est produite dans System.Windows.Forms.dll

Informations supplémentaires*: Unable to get the window handle for the 'WebBrowser' control. Windowless ActiveX controls are not supported.

Je sais pas d'ou vient le probleme, est-il declencher a cause de thread?
Merci de m'aider.

[tomlev]

A priori tu as du accéder au contrôle WebBrowser avant qu'il ne soit initialisé... normalement le handle s'initialise automatiquement lors du premier accès, mais là tu y accèdes à partir d'un autre thread. Seul le thread principal a accès aux contrôles de l'interface utilisateur. Si ta fonction accède aux contrôles, elle doit s'exécuter dans le thread principal, pas dans un autre...

[chrismonoye]

Bonsoir,
on peut reproduire l'erreur, (en français) :

Impossible d'obtenir le handle de fenêtre pour le contrôle 'WebBrowser'. Les contrôles ActiveX sans fenêtre ne sont pas pris en charge.

par exemple si on oublie, en cas de création dynamique du contrôle, de l'ajouter au formulaire :

Code :

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

Me.Controls.Add(wb)