TAbCustomZipKit

type TAbCustomZipKit = class(TAbCustomZipper)

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();

  property ExtractOptions: TAbExtractOptions; [rw]

  property PasswordRetries: Byte; [rw]

  property OnConfirmOverwrite: TAbConfirmOverwriteEvent; [rw]

  property OnNeedPassword: TAbNeedPasswordEvent; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure ExtractAt();

  procedure ExtractFiles();

  procedure ExtractFilesEx();

  procedure ExtractTaggedItems;

  procedure ExtractToStream();

  procedure TestTaggedItems;

  property Spanned: Boolean;

end;

TAbCustomZipKit

TAbCustomZipper

TAbCustomZipBrowser

TAbBaseBrowser

TAbBaseComponent

TObject