ShellBrowser Delphi Components Documentation
ContentsIndexHome
Example

The following example shows how to append multiple files to a ZIP file:

  var
    Files: IItemIdListCollection;
    ZipFile: IItemIdList;
  begin
    Files := TItemIdListCollection.Create;
    Files.Add('C:UsersPublicMusicsample.mp3');
    Files.Add('C:UsersPublicMusicsample2.mp3');
    ZipFile := TJamItemIdList.Create('C:Zipfile.zip');
    TJamFileOperation.Zip(Files, ZipFile);
  end;