If you need advanced file and streaming compression for your application, the IPWorks Zip library is a good choice. This library is easy to integrate, fast, and effective components that enable developers to rapidly add advanced compression and decompression features to your application.
Table of Contents
What is IPWorks ZIP?
IPWorks ZIP allows developers to easily integrate compression and decompression into applications using the Zip, Tar, Gzip, 7-Zip, Bzip2, ZCompress, or Jar standards for compression.
procedure TFormCreatesevenzip.btnZipClick(Sender: TObject);
var
curListItem: TListItem;
begin
try
SevenZip1.Reset;
ProgressBar1.Position := 0;
SevenZip1.ArchiveFile := txtArchiveFile.Text;
curListItem := lstLocalFiles.Selected;
if Assigned(curListItem) then
begin
while Assigned(curListItem) do
begin
SevenZip1.IncludeFiles(lblDirectory.Caption + '' +
curListItem.Caption);
curListItem := lstLocalFiles.GetNextItem(curListItem, sdAll,
[isSelected]);
end;
end;
// You can also add files to an archive using a filemask for instance:
// SevenZip1.IncludeFiles('c:*.txt');
if not(txtPassword.Text = '') then
begin
SevenZip1.Password := txtPassword.Text;
end;
SevenZip1.Compress;
ShowMessage('SevenZip complete.');
except
on E: EipzZip do
ShowMessage(E.Message);
end;
SevenZip1.ArchiveFile := ''; // Release the handle on the archive file.
end;IPWorks Features
- Streaming support during file compression/decompression
- Delete individual files within an archive without decompressing the entire file.
- Encryption
- Support for the Open XML Packing format
- PKZip-compatible Zip compressor
- 128-bit, 192-bit, and 256-bit AES encryption
- Zip64 Archives support – 4GB+ zip files with a virtually unlimited number of files
- and more
Supported platforms
- Delphi
- C++ Builder
- and other major stacks
How to get the IPWorks ZIP library?
