ProgressBar installation de logiciel

**deouf** · 02/01/2016, 09h53

Bonne année a tout le monde
J'ai besoin d'aide s'il vous plait

Je veux créer une interface pour installer plusieurs logiciels en même temp, en mode silent

Et je veux ajouter une progress bar pour voir l' avancement de chaque installation.

1 - le code pour installation des logiciels est OK, mais progressbar n'affiche rien.
ma question est :
Comment ajouter progressbar pour voir l'avancement de l'instalation de chaque logiciel ?
merci d'avance
voici mon Code

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Public Class Form1 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        BackgroundWorker1.RunWorkerAsync() 
 
    End Sub 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
        Control.CheckForIllegalCrossThreadCalls = False 
    End Sub 
 
    Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork 
        Dim p As New Process 
        BackgroundWorker1.ReportProgress() 
        System.Threading.Thread.Sleep(100) 
        p.StartInfo.FileName = "cmd.exe" 
        p.StartInfo.Arguments = "/c start C:\Users\Computer\Desktop\vlc\vlc-2.2.1-win32.exe /S" 
        p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden 
        p.Start() 
        System.Threading.Thread.Sleep(100) 
 
 
 
    End Sub 
 
    Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged 
        ProgressBar1.Value = e.ProgressPercentage 
 
    End Sub 
 
    Private Sub BackgroundWorker1_RunWorkerCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted 
 
        Label1.Text = "Success" 
    End Sub 
End Class

**Pol63** · 02/01/2016, 10h18

Code :

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

Control.CheckForIllegalCrossThreadCalls = False

cette ligne de code est "interdite"
(au passage il y a une balise pour la mise en forme du code sur le forum)

Code :

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

BackgroundWorker1.ReportProgress(pct)

il faut mettre une valeur sur cette ligne de code, et c'est cette valeur qui sera dans e.ProgressPercentage dans l'autre évènement
le progressbar n'est en rien magique, il ne devine pas quand ce que tu veux lui faire gérer sera fini (ni sur quelle partie de ton code il porte)
il faut l'appeler à chaque fois que tu veux que ca avance, pour ca il faudrait donc que tu puisses savoir où ça en est, ce qui n'est pas forcément simple je pense

**deouf** · 02/01/2016, 17h19

merci pour votre repense
pourquoi cette ligne de code est "interdite" ***Control.CheckForIllegalCrossThreadCalls = False*** ?

vous pouvez me donnè un exemple SVP (niveau débutent) ?

**Pol63** · 02/01/2016, 19h12

c'est précisé sur l'aide (msdn)
cette ligne sert à débugger pour trouver à quel endroit de son code on fait un appel cross thread (thread seconde qui modifie l'interface)
mais elle peut provoquer une instabilité

sans cette ligne l'application plante si on fait du cross thread
les débutants s'en servent car le mécanisme des threads n'est pas forcément intuitif, mais il n'est pas insurmontable