Zip

Declaration

Procedure Zip( aZipTargetFileName : string, aSourceFileList : array of string )

Example

procedure OnMapEvent(var Value:Variant);
begin
  Zip('C:\Temp\TwoFiles.zip', ['C:\Temp\File1.txt','C:\Temp\File2.txt']);
end;

Description

Produces a zipped - i.e. combined and compressed - output file from one or more source files.

The first value passed to the procedure is the name (and path) of the zipped output file. The second value is a list of the files to be zipped into the output. The list of source file names must be in list/array notation, with square brackets at beginning and end.

If the output file exists already, it will be overwritten. Source files can be of any type (e.g. text, binary), and different file types can be zipped together.