Discussion :

[Shennong]

Bonjour,

Je souhaiterai pouvoir ouvrir un formulaire sur un autre thread. Ce dernier comporte un label et une picturebox avec un gif à l'intérieur. Il s'git d'un formulaire d'attente que j'affiche durant certaines opérations.

Le problème est que j'ai l'erreur suivante lorsqu'il est sensé s'afficher :



Vous pouvez voir sur la capture, l'erreur, et le code de construction du thread, avec la procédure d'appel.

Si quelqu'un a une idée sur la résolution de ce problème, je suis preneur.


Merci d'avance !

Cordialement-

[thovan]

Hello,

Essaies ceci :

Code :

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

Invoke(New MethodInvoker(Sub() waiting.PictureBox1.Image = My.Resources.WAIT)

[Shennong]

Bonjour Thovan, merci pour ton aide.

Je dois mettre ce code dans le Sub du "btn_Rechercher" ou le Sub "DisplayWait" par contre stp ? Merci.

Cordialement-

[thovan]

Bonjour Thovan, merci pour ton aide.

Je dois mettre ce code dans le Sub du "btn_Rechercher" ou le Sub "DisplayWait" par contre stp ? Merci.

Cordialement-

Tu remplaces la ligne sur laquelle ton programme plante par celle que je t'ai donnée

[Shennong]

Merci, effectivement, on fait un pas en avant

L'erreur n'apparaît plus, cependant le formulaire "Waiting" ne s'affiche pas

Je ne comprends pas pourquoi.

Cordialement-

[thovan]

Essaies la même chose,
Remplace Application.Run(Message) par

Code :

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

Invoke(New MethodInvoker(Sub() Application.Run(message))

[Shennong]

Pas d'erreur non plus, mais le formulaire ne s'affiche toujours pas … :s

Cordialement-

[thovan]

Remplace la ligne par

Code :

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

Message.Show()

[Shennong]

Alors, en mettant juste :

Code :

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

1
2
3
4
Public Sub DisplayWait()
        Dim message = New Waiting
        Invoke(New MethodInvoker(Sub() message.Show()))
    End Sub

Le formulaire s'affiche, mais j'ai un th.abort() plus loin, et le formulaire ne se ferme plus XD

[thovan]

Essayes d'abord avec message.Show() pour voir si il s'ouvre bien...
Après on regardera pour le fermer.

[Shennong]

Oui c'est bon ça, le message juste au-dessus du tiens (on a dû poster quasiment en même temps) montre que tout fonctionne bine désormais, le formulaire s'affiche bien, cependant il ne se ferme pas lorsque la fonction th.abort() est exécutée à la fin de la recherche.

Il faudrait peut-être juste mettre Waiting.close() après le abort non ?

Cordialement-

[Shennong]

Du coup j'ai directement chargé l'image dans le picturebox du formulaire waiting. Lorsque le formulaire s'affiche, l'image s'affiche correctement également.

Plus qu'à trouver comment le fermer proprement

Cordialement-

[thovan]

Oublies le abort()... cette fonction n'est pas fiable... (Cf doc microsoft).
Je pense que tu peux simplement faire

Code :

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

1
2
 
message.close()

[Shennong]

Donc, j'ai essayé avec simplement "Waiting.Close()", cela ne fonctionne pas.

J'ai donc mis ma déclaration "Dim message = new Waiting" en variable de classe pour qu'elle soit accessible depuis le reste du code. En faisant "message.close()", j'obtiens l'erreur suivante :




Et en fait, sur des recherches plus longues (car là c'était quasi instantané), je me suis aperçu que le formulaire ne s'affichait qu'après la recherche …

Je pige plus rien là …

Cordialement-

[thovan]

Je vais manger et après-midi si tu veux on peux regarder.
Avec Teamviewer ça serait encore mieux....
Si tu l'as, tu peux m'envoyer les infos en mp.

[Shennong]

Je vais pas pouvoir faire de TeamViewer. Je suis au boulot, et c'est du travail sur les données client. Désolé.

Je vais continuer de chercher pour trouver une solution. Je te tiens au courant si je trouve quelque chose.

Merci de ton aide.

Cordialement-

[thovan]

En fait...
Tu lances une recherche et pendant l'attente tu veux afficher cette fenêtre et la fermer quand la recherche est terminée...

Donc, tu fais un thread a part qui fait tourner la fenêtre d'attente....

Le truc c'est de trouver une subtilité pour dire a cette fenêtre de se fermer quand la recherche est finie...
Il faudrait par exemple un flag sur False qui devient True quand tu as soit trouvé ce que tu cherches, soit tout balayé sans avoir trouvé....

Donc pas besoin de la fonction abort()...
Quand ton flag deviens true, simplement fermer la fenêtre de la même manière que tu l'as appelée devrait fonctionner...

Je n'ai jamais fait ce genre de code donc difficile à dire sans pouvoir y accéder et tester ... mais je comprends bien que tes données doivent rester privées !

[Shennong]

Bon j'ai fini par résoudre mon problème !

Oui, c'est exactement le fonctionnement que je cherche à avoir, c'est tout à fait ça. Je ne sais pas si on peut s'y prendre autrement, mais c'est le plus "simple" que j'ai pu trouver.

J'ai modifié le code en suivant quelques exemples sur internet, et ça fonctionne bien, plus d'erreur, et le formulaire se ferme impeccable. Mais c'est en utilisant le abort. C'est pas très propre, mais j'ai essayé d'autres choses et malheureusement ça ne fonctionne pas.

J'ai essayé de mettre un timer sur le formulaire en question, qui a chaque Tick vérifie une variable booléenne. Normalement, à true, j'ai mis "me.close", mais lorsque je passe la variable à True, il ne se passe rien. Je l'ai bien déclaré en public dans le formulaire précédent, d'où je crée mon thread pourtant.

Si tu as une idée

Cordialement-

[Shennong]

Le code modifié :

Le sub appelé par le nouveau thread :

Code :

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

1
2
3
4
5
6
7
 
  Public Sub DisplayWait()
        Dim WaitText = New Waiting()
        'Invoke(New MethodInvoker(Sub() WaitText.PictureBox1.Image = My.Resources.WAIT))
        Application.Run(WaitText)
        'Invoke(New MethodInvoker(Sub() WaitText.Show()))
    End Sub

et la construction et l'exécution du nouveau thread :

Code :

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

1
2
3
4
 
 Dim myThread As Thread = New Thread(New ThreadStart(AddressOf DisplayWait))
        myThread.SetApartmentState(ApartmentState.STA)
        myThread.Start()

et enfin, pour fermer le formulaire :

Code :

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

myThread.Abort()

[thovan]

Bon j'ai fini par résoudre mon problème !

Oui, c'est exactement le fonctionnement que je cherche à avoir, c'est tout à fait ça. Je ne sais pas si on peut s'y prendre autrement, mais c'est le plus "simple" que j'ai pu trouver.

J'ai modifié le code en suivant quelques exemples sur internet, et ça fonctionne bien, plus d'erreur, et le formulaire se ferme impeccable. Mais c'est en utilisant le abort. C'est pas très propre, mais j'ai essayé d'autres choses et malheureusement ça ne fonctionne pas.

J'ai essayé de mettre un timer sur le formulaire en question, qui a chaque Tick vérifie une variable booléenne. Normalement, à true, j'ai mis "me.close", mais lorsque je passe la variable à True, il ne se passe rien. Je l'ai bien déclaré en public dans le formulaire précédent, d'où je crée mon thread pourtant.

Si tu as une idée

Cordialement-

ça devient compliqué sans voir le truc tourner....
Ta variable est dans quel formulaire...?
Je suppose dans celui de départ...? donc tu dois la rebalancer dans ton autre form à chaque fois que tu l'évalues et agir en conséquence......?
Tout ça m'as l'air bien compliqué.

Personnellement, quand je mets un truc pour signaler à l'utilisateur que le programme tourne et qu'il doit attendre, je mets un progressbar....
C'est facile à gérer, mais je ne sais pas si c'est adapté à ton cas.