Unzip .bz2 (BZip2) Compressed File

Unzips a .bz2 compressed file.

Download Chilkat 32-bit Zip ActiveX (.msi) (includes objects for .zip, .gz, .bz2, and .Z)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATBZ2Lib_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
bz2: TChilkatBz2;
success: Integer;

begin
bz2 := TChilkatBz2.Create(Self);

//  Any string unlocks the component for the 1st 30-days.
success := bz2.UnlockComponent('Anything for 30-day trial.');
if (success <> 1) then
  begin
    ShowMessage(bz2.LastErrorText);
    Exit;
  end;

//  The .bz2 file format is not an archive.  Only a single
//  file may be compressed / decompressed.  It is for this reason that you'll
//  often see TAR files compressed with BZip2 (i.e. a file
//  ending in .tar.bz2.

//  This example will uncompress an XML file.
//  The 1st arg is the file to decompress, the 2nd arg is
//  the output filename.
success := bz2.UncompressFile('hamlet.xml.bz2','hamlet.xml');
if (success <> 1) then
  begin
    ShowMessage(bz2.LastErrorText);
    Exit;
  end;

//  There is no limitation on the size of files that may be uncompressed.
ShowMessage('Success!');
end;