Skip to content

TZipper.Zip

Convenience method used to create a .zip file with the given name containing the specified file(s).

Declaration

Source position: zipper.pp line 482

public 
class procedure Zip(const AZipFileName: RawByteString; 
                   const aFileToBeZipped: RawByteString);

class procedure Zip(const AZipFileName: RawByteString; 
                   aFileList: Array of RawByteString);

class procedure Zip(const AZipFileName: RawByteString; 
                   aFileList: TStrings);

Description

Zip is a class procedure used to create a .zip file with the name specified in AZipFileName. Overloaded variants are provided that allow one or more file names to be specified using the AFileToBeZipped or AFileList arguments.

For example:

var
  SZip, SFile: RawByteString;

  SZip := '/usr/tmp/docbook5-catalog.zip';
  SFile := '/usr/share/xml/docbook/schema/sch/5.0/catalog.xml'

  TZipper.Zip(SZip, SFile);
  

See also

Name Description
TUnzipper.Unzip Unzips the specified .ZIP archive file.