TAbCustomZipper

type TAbCustomZipper = class(TAbCustomZipBrowser)

protected

  FAutoSave: Boolean;

  FCompressionMethodToUse: TAbZipSupportedMethod;

  FDeflationOption: TAbZipDeflationOption;

  FDOSMode: Boolean;

  FOnConfirmSave: TAbArchiveConfirmEvent;

  FOnSave: TAbArchiveEvent;

  FOnArchiveSaveProgress: TAbArchiveProgressEvent;

  FArchiveSaveProgressMeter: IAbProgressMeter;

  FStoreOptions: TAbStoreOptions;

  procedure DoConfirmSave(); virtual;

  procedure DoSave(); virtual;

  procedure DoArchiveSaveProgress();

  procedure InitArchive; override;

  procedure SetAutoSave();

  procedure SetCompressionMethodToUse();

  procedure SetDeflationOption();

  procedure SetDOSMode();

  procedure SetFileName(); override;

  procedure SetStoreOptions();

  procedure SetArchiveSaveProgressMeter();

  procedure SetZipfileComment(); override;

  procedure ZipProc();

  procedure ZipFromStreamProc();

  procedure Notification(); override;

  procedure ResetMeters; override;

  property AutoSave: Boolean; [rw]

  property CompressionMethodToUse: TAbZipSupportedMethod; [rw]

  property DeflationOption: TAbZipDeflationOption; [rw]

  property DOSMode: Boolean; [rw]

  property StoreOptions: TAbStoreOptions; [rw]

  property ArchiveSaveProgressMeter: IAbProgressMeter; [rw]

  property OnConfirmSave: TAbArchiveConfirmEvent; [rw]

  property OnSave: TAbArchiveEvent; [rw]

  property OnArchiveSaveProgress: TAbArchiveProgressEvent; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure AddFiles();

  procedure AddFilesEx();

  procedure AddFromStream();

  procedure DeleteAt();

  procedure DeleteFiles();

  procedure DeleteFilesEx();

  procedure DeleteTaggedItems;

  procedure FreshenFiles();

  procedure FreshenFilesEx();

  procedure FreshenTaggedItems;

  procedure Move();

  procedure Save;

  procedure Replace();

end;

TAbCustomZipper

TAbCustomZipBrowser

TAbBaseBrowser

TAbBaseComponent

TObject