(Xojo Plugin) Unzip Files to Byte Array

Demonstrates how to unzip each file contained in a .zip to an in-memory byte array.

Note: This example requires Chilkat v11.0.0 or greater.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim success As Boolean
success = False

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

Dim zip As New Chilkat.Zip

success = zip.OpenZip("qa_data/zips/test.zip")
If (success = False) Then
    System.DebugLog(zip.LastErrorText)
    Return
End If

// Iterate of each entry in the zip.
// An entry can be a file or directory entry.  For each file, unzip to a byte array.
Dim numEntries As Int32
numEntries = zip.NumEntries
System.DebugLog("NumEntries = " + Str(numEntries))

Dim entry As New Chilkat.ZipEntry
Dim i As Int32
i = 0
While i < numEntries
    success = zip.EntryAt(i,entry)
    If (entry.IsDirectory = False) Then
        Dim fileData As MemoryBlock
        fileData = entry.Inflate()
        // Do whatever you wish with the file data...
    End If

    i = i + 1
Wend

zip.CloseZip 

System.DebugLog("Finished.")