Quantcast
Channel: BetaArchive
Viewing all articles
Browse latest Browse all 70053

Re: SevenZipSharp and progress troubles.

$
0
0
In Forum: Web Design/Programming Support and Discussion
By User: AlphaBeta

Maybe because you didn't add the Handles suffix to the "Private Sub ext_Extracting..." line?

EDIT: I edited your code, so it should work:
Public Class Form1
Private listItemIndex As Integer = 0
Friend WithEvents ext As SevenZipExtractor = New SevenZipExtractor("C:\Test.7z")

Public Sub ext_Extracting(ByVal sender As Object, ByVal e As SevenZip.ProgressEventArgs) Handles ext.Extracting
If listItemIndex < ext.ArchiveFileNames.Count Then
Label1.Text = ext.ArchiveFileNames.Item(listItemIndex).ToString()
listItemIndex += 1
End If
End Sub
End Class

Viewing all articles
Browse latest Browse all 70053

Latest Images

Trending Articles



Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>