Discussion :

[Persons]

Bonjour à tous,

J'ai récupéré dans la faq le code pour créer et utiliser un thread.
Dans ce thread, j'utilse une procédure qui compte le nombre d'items d'une list box.
Lorsque j'utilise cette procédure indépendemment du thread, elle me renvoie bien le nombre d'items alors que lorsque je l'utilise dans le thread, elle compte 0 élément de la listbox alors qu'il y en a.
J'ai placé cette procédure dans un module

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Sub appel_calculer()
        Dim i As Integer = 0, j As Integer
        If frm_automate.lst_fic.Items.Count > 0 Then
            frm_automate.pgb.Value = 0
 
            j = frm_automate.lst_fic.Items.Count()
            frm_automate.pgb.Maximum = j
            While i <= j And frm_automate.flag = True
                'My.Application.DoEvents()
                Call calculer()
                frm_automate.pgb.Value = i
                i = i + 1
            End While
        End If
    End Sub

Pourquoi lorsque j'utilise cette procédure dans un thread, le nombre d'item de la liste renvoi 0?

Merci d'avance pour votre aide.

[Mehdi Feki]

Salut Persons,

Peut etre parce que ton code est un peut compliquer pour calculer le nombre d'items d'une liste !!

Tu as besoin juste de recuperer lst_fic.Items.Count, pourquoi tu as ecris tout ce code, à vrai dire je n'ai pas trop essayé de comprendre ce que fais ton code.

[Persons]

Ben c'est bien ce que je fais:
je veux que lorsque le nombre d'items est >0 dans la listebox (If frm_automate.lst_fic.Items.Count > 0 Then.....) je fasse un traitement or quand je déroule en mode pas à pas , je constate que ma listebox contient des éléments mais que dans cette procédure il me dit qu'il y en a 0.

Je sais que c'est ce code est bon (dans la procédure appel_calculer) car lorsque je l'utilise hors d'un thread, ca fonctionne très bien mais avec un thread par contre ca ne va pas.

[Mehdi Feki]

Ok j'ai revu le code , et j'ai quelque questions

j = frm_automate.lst_fic.Items.Count()
frm_automate.pgb.Maximum = j
While i <= j And frm_automate.flag = True
'My.Application.DoEvents()
Call calculer()
frm_automate.pgb.Value = i
i = i + 1
End While

• Deja tu recupere lst_fic.Items.Count(), c'est le resultat que tu cherches
• frm_automate.flag = True, je ne vois pas comment il est peut devenir False,
• Que fais Call calculer() ?
• pgb.Value = i. Quel est le type de pgb ?
• A la fin de la boucle i va avoir la meme valeur que j

Fais un breakpoint sur j = frm_automate.lst_fic.Items.Count() et verifie la valeur de j.

[Persons]

et bien non justement, mais problème et que la listebox contient des éléments, mais que lorsque j'utilise ma procédure avec un thread autre que celui généré par la form et bien je récupère 0 dans comme nombre d'élément contenu dans la listbox.

Dans ma question est:
Lorsque je génère un thread autre que celui généré par la form, comment puis-je récupéré des informations sur les composants de la form (thread n°1) dans le thread n°2.

[ekinox17]

Bonjour,

Code :

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

1
2
3
'ceci permet de manipuler les objet de l'interface a partir d'autres thread il faut le faire avant de lancer le thread
Control.CheckForIllegalCrossThreadCalls = false
MonThread.start(appel_calculer)

[Mehdi Feki]

Bonjour,

Code :

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

1
2
3
'ceci permet de manipuler les objet de l'interface a partir d'autres thread il faut le faire avant de lancer le thread
Control.CheckForIllegalCrossThreadCalls = false
MonThread.start(appel_calculer)

Oui je crois bien que ton code est util parce qu' apparament il accede à un control en ecriture frm_automate.pgb.Value = i, mais puisqu'il n'a repondu à aucune de mes question, je ne peux dans ce cas aider d'avantage.