Delete File from Zip

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

Delphi example code showing how to remove a file from a .zip.

// Opens a .zip, removes a file, and rewrites the .zip file.
procedure TForm1.Button12Click(Sender: TObject);
var
  i : Integer;
  success : Integer;
  entry: IChilkatZipEntry2;

begin
  ChilkatZip21.UnlockComponent('anything for 30-day trial');

  // Open a zip.
  success := ChilkatZip21.OpenZip('test.zip');
  if (success = 0) then
    begin
      ChilkatZip21.SaveLastError('zipErrorLog.txt');
      ShowMessage(ChilkatZip21.LastErrorText);
    end
  else
    begin
        // The first entry matching "*.exe" is "setup.exe"
        entry := ChilkatZip21.FirstMatchingEntry('*.exe');

        // Remove this entry from the zip object.
        ChilkatZip21.DeleteEntry(entry);

        // Write the zip.
        ChilkatZip21.WriteZipAndClose();
    end;

end;