Problème de delegate

Version imprimable

Bonjour,

j'ai une tâche multithread qui doit faire une écriture dans un listeview
mais je comprend pas pk mon lv a un invoke.required = true

voici mon code

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
'Au debut de la classe 
Delegate Sub UIOneArgSub(ByVal Msg As String)
Dim DelRecLVStat As UIOneArgSub
 
'Dans mon sub 
Dim Msg As String = (r.Item(0) & ";" & r.Item(1) & ";" & r.Item(2) & ";" & r.Item(3))
            DelLVStat(Msg)
 
 
Sub DelLVStat(ByVal msg As String)
        If Not LVStat2.InvokeRequired Then
            Dim MaStr() As String
            MaStr = msg.Split(";")
            Dim LVI As New ListViewItem
            LVI.UseItemStyleForSubItems = False
            LVI.Text = MaStr(0)
            LVI.SubItems.Add(MaStr(1))
            LVI.SubItems.Add(MaStr(2))
            LVI.SubItems.Add(MaStr(3))
            LVStat2.Items.Add(LVI)
        Else
            DelRecLVStat = New UIOneArgSub(AddressOf DelLVStat)
            Me.BeginInvoke(DelRecLVStat, New Object() {msg})
        End If
    End Sub

pourtant dans une autre form la sequense fonctionne bien

merci de vos suggestions

Mario

18/07/2012, 18h38
Mario Rousson

Désolé le problème était au niveau de la déclararion des threads.

Ouaie bien quelqu'un peut-il m'expliquer pk lorsque je mais un .join à mes threads mon delegate ne fonctionne plus, et sans le .join ça fonctionne bien.

Code:

1
2
3
4
5
6
7
8
For i = 0 To 10
            Dim T As New Threading.Thread(AddressOf DoTheTask2)
            T.Name = "Thread#" & i.ToString
            ObjDataSetEtFin.Tables.Add(T.Name)
            MiseEnForme(ObjDataSetEtFin.Tables(T.Name), "EtFin")
            T.Start(T.Name)
            T.Join()
        Next

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub DoTheTask2(ByVal thr As String)
        SyncLock (Lock)
            Do Until QuTor.Count = 0
                Dim Symb As String = QuTor.Dequeue
                CreerDataTable2(Symb, "T", thr)
                ObjDataSetEtFin.Tables(thr).Dispose()
                ObjDataSetEtFin.Tables(thr).Rows.Clear()
                My.Application.DoEvents()
            Loop
etc.
Sub CreerDataTable2(ByVal symb As String, ByVal Brs As String, ByVal thr As String)
...
 Dim Msg As String = String.Format("{0};{1};{2};{3}", symb, CrRev, CrBen, CrCap)
        DelLVStat(Msg)
...
end sub

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub DelLVStat(ByVal msg As String)
        If Not LVStat2.InvokeRequired Then
            Dim MaStr() As String
            MaStr = msg.Split(";")
            Dim LVI As New ListViewItem
            LVI.UseItemStyleForSubItems = False
            LVI.Text = MaStr(0)
            LVI.SubItems.Add(MaStr(1))
            LVI.SubItems.Add(MaStr(2))
            LVI.SubItems.Add(MaStr(3))
            LVStat2.Items.Add(LVI)
        Else
            DelRecLVStat = New UIOneArgSub(AddressOf DelLVStat)
            Me.BeginInvoke(DelRecLVStat, New Object() {msg})
        End If

merci

22/07/2012, 10h39
Pol63

le multithreading est quelque chose qui peut etre complexe
ce que vous en faites me semble étrange à première vue

il faut éviter les .join sur le thread principal (et tout ce qui peut durer plus d'une seconde de manière générale)
il faut éviter application.doevents, ca montre en général une mauvaise construction
et avec un synclock dessus ca doit pouvoir mener à un deadlock ^^

ca ressemble à du code improvisé, et avec un mauvais paramétrage de vs (il faut activer option strict on par exemple)

tu as essayé le backgroundworker ?
22/07/2012, 15h17
Mario Rousson

Oui J'ai essayé le backgroudWorker mais je recherche une solution qui peut faire plusieurs fois la même routine avec des paramaitre différant.

Je viens d'activer option strict j'ai beaucooup de correction à faire alors je reviendrai la dessus plus tart.
22/07/2012, 19h38
Pol63

Citation:

Envoyé par Mario Rousson

Oui J'ai essayé le backgroudWorker mais je recherche une solution qui peut faire plusieurs fois la même routine avec des paramaitre différant.

le backgroundworker n'est qu'un thread encapsulé avec tout ce qui est utile (mise à jour de l'UI, cancellation pré cablée etc...) donc souvent plus pratique pour les débutants
tout ce qu'on peut faire avec un thread, on peut le faire avec le backgroundworker

Citation:

Envoyé par Mario Rousson

Je viens d'activer option strict j'ai beaucooup de correction à faire alors je reviendrai la dessus plus tart.

à faire quand même
ca évite parfois de passer 3 jours à cherche un bug 6 mois après
23/07/2012, 00h47
Mario Rousson

Merci beaucoup Pol63 Je viens de corrigé une multitude d'erreurs en activant la fonction strick.

Je me rend compte que je doit reprendre une bonne partis de mon code:(, c'est apprecié de comprendre que je suis amateur en programmation et que j'apprend par des conseils comme tu donnes.:ccool:

bonne journée