Delphi ActiveX Requires Chilkat v11.0.0+

Get ZIP Directory Information as XML

See more Zip Examples

This example demonstrates how to use the GetDirectoryAsXML method to retrieve information about the contents of a ZIP archive as an XML document.

The returned XML describes the files currently contained in the ZIP object

Delphi ActiveX

var
success: Integer;
zip: TChilkatZip;
xml: WideString;

begin
success := 0;

//  Open an existing ZIP archive.
zip := TChilkatZip.Create(Self);

success := zip.OpenZip('example.zip');
if (success = 0) then
  begin
    Memo1.Lines.Add(zip.LastErrorText);
    Exit;
  end;

//  Get the ZIP directory information as XML.
xml := zip.GetDirectoryAsXML();

Memo1.Lines.Add(xml);

//  Suppose the ZIP contains:

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

//  The XML contains one element for each ZIP entry.
//  Example:
//  
//  <?xml version="1.0" encoding="utf-8"?>
//  <zip_contents>
//      <dir name="data">
//          <dir name="config">
//              <file>settings.json</file>
//          </dir>
//      </dir>
//      <dir name="docs">
//          <file>readme.txt</file>
//      </dir>
//      <dir name="images">
//          <file>logo.png</file>
//      </dir>
//  </zip_contents>

zip.CloseZip();

Memo1.Lines.Add('Done.');