TAbCustomUnZipper

type TAbCustomUnZipper = class(TAbCustomZipBrowser)

protected

  FExtractOptions: TAbExtractOptions;

  FOnConfirmOverwrite: TAbConfirmOverwriteEvent;

  FOnNeedPassword: TAbNeedPasswordEvent;

  FPasswordRetries: Byte;

  procedure DoConfirmOverwrite(); virtual;

  procedure DoNeedPassword(); virtual;

  procedure InitArchive; override;

  procedure SetExtractOptions();

  procedure SetPasswordRetries();

  procedure UnzipProc();

  procedure UnzipToStreamProc();

  procedure TestItemProc();

  procedure SetFileName(); override;

  property ExtractOptions: TAbExtractOptions; [rw]

  property OnConfirmOverwrite: TAbConfirmOverwriteEvent; [rw]

  property OnNeedPassword: TAbNeedPasswordEvent; [rw]

  property PasswordRetries: Byte; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure ExtractAt();

  procedure ExtractFiles();

  procedure ExtractFilesEx();

  procedure ExtractToStream();

  procedure ExtractTaggedItems;

  procedure TestTaggedItems;

end;

TAbCustomUnZipper

TAbCustomZipBrowser

TAbBaseBrowser

TAbBaseComponent

TObject