[Pytanie] Instalator + VB

[er007]

Witam.

Mam takie pytanie.

Czy jest możliwość połączenia instalatora (np. tego z WinRar'a) z programem (VB)

Jeśli tak, to czy:

- Można to połączyć z ProgressBar'em ?

- Czy program nie będzie się zawieszał ?

 

 

 

PS

Czemu jak używam dll'ki - Ionic.zip

To podczas wypakowywania program się zawiesza ;P?

 

Pozdrawiam.

[Sunnyline2]

Czemu jak używam dll'ki - Ionic.zip

To podczas wypakowywania program się zawiesza ;P?

 

 

Bo wypakowywuje, a nie zrobileś nowego threadu więc będzie sie zawieszać.

[er007]

 

Bo wypakowywuje, a nie zrobileś nowego threadu więc będzie sie zawieszać.

Chodzi o sleep ?

Mam taki kod: (W Private sub)

 

        For Each ZipEntry In ZipFile.Read(GetFolderPath(SpecialFolder.ApplicationData) & ("/.xxx.zip"))
            ZipEntry.Extract(GetFolderPath(SpecialFolder.ApplicationData) & ("/"), ExtractExistingFileAction.OverwriteSilently)
            ProgressBar1.Value = ProgressBar1.Value + 1
            ProgressBar1.Maximum = ZipFile.Read(GetFolderPath(SpecialFolder.ApplicationData) & ("/.xxx.zip")).Entries.Count
        Next
 
        ChromeButton1.Enabled = True
        ChromeButton2.Enabled = True
        TextBox1.Enabled = True
        ComboBox1.Enabled = True
        ProgressBar1.Value = 0
        ProgressBar1.Visible = False
        Label3.Visible = False
        Label8.Visible = False
 
        Graj()

 

Zapomniałem dodać, że zawiesza się, wtedy jak łącze .exe z .dll [iLmarge(Gui)]

[Sunnyline2]

Chodzi o sleep ?

Mam taki kod: (W Private sub)

        For Each ZipEntry In ZipFile.Read(GetFolderPath(SpecialFolder.ApplicationData) & ("/.xxx.zip"))
            ZipEntry.Extract(GetFolderPath(SpecialFolder.ApplicationData) & ("/"), ExtractExistingFileAction.OverwriteSilently)
            ProgressBar1.Value = ProgressBar1.Value + 1
            ProgressBar1.Maximum = ZipFile.Read(GetFolderPath(SpecialFolder.ApplicationData) & ("/.xxx.zip")).Entries.Count
        Next
 
        ChromeButton1.Enabled = True
        ChromeButton2.Enabled = True
        TextBox1.Enabled = True
        ComboBox1.Enabled = True
        ProgressBar1.Value = 0
        ProgressBar1.Visible = False
        Label3.Visible = False
        Label8.Visible = False
 
        Graj()

Zapomniałem dodać, że zawiesza się, wtedy jak łącze .exe z .dll [iLmarge(Gui)]

Chodzi mi o nowy wątek (thread)

Bez łączenia też się zawiesza (raczej na pewno powinno) ?

Poczekaj chwile aż się wypakuje i czy sie odetnie.

[er007]

Chodzi mi o nowy wątek (thread)

Bez łączenia też się zawiesza (raczej na pewno powinno) ?

Poczekaj chwile aż się wypakuje i czy sie odetnie.

 

Bez łączenia nie wiesza.

 

Ale bardziej mnie interesuje pierwsze pytanie, czyli te z instalatorem ;P

[er007]

ref

[er007]

ref

[er007]

ref

[er007]

ref

[er007]

ref

[er007]

ref

[piotrek693206]

Mi też się wiesza chociaż używam thread.sleep i nic.

[er007]

ref

[hugo111]

Tworzysz BackgroundWorker a w nim umieszczasz kod rozpakowywania. Do ProgressChangedEventHandler Dajesz: progressBar1.Value = e.ProgressPercentage;

[er007]

Tworzysz BackgroundWorker a w nim umieszczasz kod rozpakowywania. Do ProgressChangedEventHandler Dajesz: progressBar1.Value = e.ProgressPercentage;

Ale kod do rozpakowania .zip czy instalatora ?

 

To ma zapobiec zawieszaniu się programu ;p?

 

Edit:

Podświetla mi e.ProgressPercentage

Błąd 1 Element „ProgressPercentage” nie jest członkiem elementu „System.ComponentModel.ProgressChangedEventHandler”. D:\MS_VS_PROJEKTY\WindowsApplication1\WindowsApplication1\Form1.vb 16 30 xxx

 

    Private Sub ProgressChanged(sender As Object, e As ProgressChangedEventHandler)
        ProgressBar1.Value = e.ProgressPercentage
    End Sub

[hugo111]

Tak ; )

Private Sub ProgressChanged(sender As Object, e As ProgressChangedEventArgs)
    ProgressBar1.Value = e.ProgressPercentage
End Sub

Powinno działać ; )