Xojo Plugin Requires Chilkat v11.0.0+

Iterate Over ZIP Entries Using EntryAt

This example demonstrates how to use the EntryAt method to iterate over all entries contained within a ZIP archive.

The EntryAt method retrieves a ZipEntry object for a given zero-based index.

This is useful for:

• Enumerating all entries in a ZIP archive
• Inspecting filenames, sizes, and timestamps
• Searching or filtering ZIP contents

Suppose the ZIP archive contains:

docs/readme.txt
images/logo.png
data/config.json

The example loops through all ZIP entries and prints information about each entry.

Xojo Plugin

Dim success As Boolean
success = False

//  Open an existing ZIP archive.
Dim zip As New Chilkat.Zip

success = zip.OpenZip("example.zip")
If (success = False) Then
    System.DebugLog(zip.LastErrorText)
    Return
End If

//  Get the total number of entries in the ZIP archive.
Dim numEntries As Int32
numEntries = zip.NumEntries

System.DebugLog("Number of ZIP entries = " + Str(numEntries))

//  Create a ZipEntry object that will be reused
//  for each entry retrieved by EntryAt.
Dim entry As New Chilkat.ZipEntry

//  Iterate over all ZIP entries.
Dim i As Int32
i = 0
While i < numEntries

    //  Retrieve the entry at index i.
    success = zip.EntryAt(i,entry)
    If (success = False) Then
        System.DebugLog(zip.LastErrorText)
        Return
    End If

    System.DebugLog("Entry " + Str(i))
    System.DebugLog("  FileName: " + entry.FileName)
    System.DebugLog("  Uncompressed Length: " + Str(entry.UncompressedLength))
    System.DebugLog("  Compressed Length: " + Str(entry.CompressedLength))
    System.DebugLog("")

    i = i + 1
Wend

//  Sample output:
//  
//  Entry 0
//    FileName: docs/readme.txt
//    Uncompressed Length: 1204
//    Compressed Length: 512
//  
//  Entry 1
//    FileName: images/logo.png
//    Uncompressed Length: 84211
//    Compressed Length: 84102
//  

zip.CloseZip 

System.DebugLog("Done.")