ZipForge is a fast and powerful VCL Zip component, written in Delphi. It lets you easily create ZIP archives, extract files from zip files to hard drive or memory, add files to a zip archive from disk or memory, replace, move and delete files in zip archives. Also it creates and reads self-extracting (SFX) zip archives, AES encrypted and multi-volume zip files.

ZipForge main features:

Opens and creates archives encrypted with strong AES encryption algorithm
Zip64 supports - lets you create ZIP files over 4 GB
Unicode file names support
Includes transaction system which allows you to rollback changes if archive update failed
Adds compressed data directly from streams and extracts archived files to streams without creating temp files
Lets you store full path with drive for each file
Allows to search for files inside archive by mask
Progress indication
Full Delphi source code is available

Features

ZIP compatibility

Fully PKZIP 4.5 compatible format
Password protection
ZIP compatible self extracting archives (SFX)

Speed

Special tuning for compression algorithms implementations
One of the fastest Deflate implementations available today
Transaction system optimizing a group of archive modifications

Functionality

Adds, moves, extracts, deletes, updates, tests, refreshes a group of files by a single operation
Save/Load zipped data from stream
Add compressed data from stream / Extract to stream
Supports in-memory archives
Compresses large files with low memory consumption
Provides compression for files, buffers, streams and strings
Stores archives in TStream descendant objects like BLOB streams
Repairs and opens corrupted archives
Zip64 format is supported
Strong AES Encryption with 128, 192 and 256 bit keys
Unicode filenames are supported
Supports archives up to 2^63 bytes, compresses and decompresses files up to 2^63 bytes
Creates multi-disk spanning archive
Splits archive to multiple volumes

Convenience

Native VCL; no DLLs; no OCXs
Well-designed component interface
Progress indication with possibility to cancel operation
Lots of useful events such as OnOverwritePrompt, OnNeedPassword, OnProcessFileFailure, etc.

Ease of use

Comprehensive help
Lots of demos
Easy-to-use interface provided by a single component
Source code available

program ZipFile;

{$APPTYPE CONSOLE}

uses
  // Add a ZipForge unit to the program
  SysUtils, ZipForge, Classes;

var
  archiver : TZipForge;

begin
  // Create an instance of the TZipForge class
  archiver := TZipForge.Create(nil);
  try
  with archiver do
  begin
    // Set the name of the archive file we want to create
    FileName := 'C:\test.zip';
    // Because we create a new archive,
    // we set Mode to fmCreate
    OpenArchive(fmCreate);
    // Set base (default) directory for all archive operations
    BaseDir := 'C:\';
    // Add file C:\test.txt the archive; wildcards can be used as well
    AddFiles('c:\test.txt');
    CloseArchive();
  end;
  except
  on E: Exception do
    begin
      Writeln('Exception: ', E.Message);
      // Wait for the key to be pressed
      Readln;
    end;
  end;  
end.

Code Sample | Manual

Home:

http://www.componentace.com/

Only for V.I.P