Class TZip
Declaration
TZip = class(TObject)
function Add(Action: Integer; ZipFile: String; FileName: String): Integer;
property AddCompLevel: Integer read ReadAddCompLevel write WriteAddCompLevel;
property AddDirNames: Boolean read ReadAddDirNames write WriteAddDirNames;
property AddDiskSpan: Boolean read ReadAddDiskSpan write WriteAddDiskSpan;
property AddDiskSpanErase: Boolean read ReadAddDiskSpanErase write WriteAddDiskSpanErase;
property AddEncrypt: Boolean read ReadAddEncrypt write WriteAddEncrypt;
property AddHiddenFiles: Boolean read ReadAddHiddenFiles write WriteAddHiddenFiles;
function AddList(Action: Integer; ZipFile: String; FileNames: TStringList): Integer;
property AddRecurseDirs: Boolean read ReadAddRecurseDirs write WriteAddRecurseDirs;
property AddSeparateDirs: Boolean read ReadAddSeparateDirs write WriteAddSeparateDirs;
property AddZipTime: Boolean read ReadAddZipTime write WriteAddZipTime;
property ConfirmErase: Boolean read ReadConfirmErase write WriteConfirmErase;
constructor Create;
function Delete(ZipFile: String; FileName: String): Integer;
function DeleteList(ZipFile: String; FileNames: TStringList): Integer;
destructor Destroy;
function Extract(Action: Integer; ZipFile: String; FileName: String; BaseDir: String): Integer;
function ExtractList(Action: Integer; ZipFile: String; FileNames: TStringList; BaseDir: String): Integer;
property ExtrDirNames: Boolean read ReadExtrDirNames write WriteExtrDirNames;
property ExtrOverwrite: Boolean read ReadExtrOverwrite write WriteExtrOverwrite;
property HowToDelete: Integer read ReadHowToDelete write WriteHowToDelete;
property KeepFreeOnDisk1: Integer read ReadKeepFreeOnDisk1 write WriteKeepFreeOnDisk1;
function List(ZipFile: String): TStringList;
property MaxVolumeSize: Integer read ReadMaxVolumeSize write WriteMaxVolumeSize;
function Message(ZipFile: String): String;
property MinFreeVolumeSize: Integer read ReadMinFreeVolumeSize write WriteMinFreeVolumeSize;
property Password: String read ReadPassword write WritePassword;
function ReadAddCompLevel: Integer;
function ReadAddDirNames: Boolean;
function ReadAddDiskSpan: Boolean;
function ReadAddDiskSpanErase: Boolean;
function ReadAddEncrypt: Boolean;
function ReadAddHiddenFiles: Boolean;
function ReadAddRecurseDirs: Boolean;
function ReadAddSeparateDirs: Boolean;
function ReadAddZipTime: Boolean;
function ReadConfirmErase: Boolean;
function ReadExtrDirNames: Boolean;
function ReadExtrOverwrite: Boolean;
function ReadHowToDelete: Integer;
function ReadKeepFreeOnDisk1: Integer;
function ReadMaxVolumeSize: Integer;
function ReadMinFreeVolumeSize: Integer;
function ReadPassword: String;
function ReadSFXAskCmdLine: Boolean;
function ReadSFXAskFiles: Boolean;
function ReadSFXCaption: String;
function ReadSFXCommandLine: String;
function ReadSFXDefaultDir: String;
function ReadSFXHideOverwriteBox: Boolean;
function ReadSFXOverwriteMode: Integer;
function ReadSpan(SpanFile: String; var ZipFile: String): Integer;
function ReadTemp: String;
function SFX2ZIP(ZipFile: String): Integer;
property SFXAskCmdLine: Boolean read ReadSFXAskCmdLine write WriteSFXAskCmdLine;
property SFXAskFiles: Boolean read ReadSFXAskFiles write WriteSFXAskFiles;
property SFXCaption: String read ReadSFXCaption write WriteSFXCaption;
property SFXCommandLine: String read ReadSFXCommandLine write WriteSFXCommandLine;
property SFXDefaultDir: String read ReadSFXDefaultDir write WriteSFXDefaultDir;
property SFXHideOverwriteBox: Boolean read ReadSFXHideOverwriteBox write WriteSFXHideOverwriteBox;
property SFXOverwriteMode: Integer read ReadSFXOverwriteMode write WriteSFXOverwriteMode;
property Temp: String read ReadTemp write WriteTemp;
procedure WriteAddCompLevel(Value: Integer);
procedure WriteAddDirNames(Value: Boolean);
procedure WriteAddDiskSpan(Value: Boolean);
procedure WriteAddDiskSpanErase(Value: Boolean);
procedure WriteAddEncrypt(Value: Boolean);
procedure WriteAddHiddenFiles(Value: Boolean);
procedure WriteAddRecurseDirs(Value: Boolean);
procedure WriteAddSeparateDirs(Value: Boolean);
procedure WriteAddZipTime(Value: Boolean);
procedure WriteConfirmErase(Value: Boolean);
procedure WriteExtrDirNames(Value: Boolean);
procedure WriteExtrOverwrite(Value: Boolean);
procedure WriteHowToDelete(Value: Integer);
procedure WriteKeepFreeOnDisk1(Value: Integer);
procedure WriteMaxVolumeSize(Value: Integer);
procedure WriteMinFreeVolumeSize(Value: Integer);
procedure WritePassword(Value: String);
procedure WriteSFXAskCmdLine(Value: Boolean);
procedure WriteSFXAskFiles(Value: Boolean);
procedure WriteSFXCaption(Value: String);
procedure WriteSFXCommandLine(Value: String);
procedure WriteSFXDefaultDir(Value: String);
procedure WriteSFXHideOverwriteBox(Value: Boolean);
procedure WriteSFXOverwriteMode(Value: Integer);
function WriteSpan(ZipFile: String; SpanFile: String): Integer;
procedure WriteTemp(Value: String);
function ZIP2SFX(ZipFile: String): Integer;
end;
Description
Declaration
function Add(Action: Integer; ZipFile: String; FileName: String): Integer;
Description
Declaration
property AddCompLevel: Integer read ReadAddCompLevel write WriteAddCompLevel;
Description
Declaration
property AddDirNames: Boolean read ReadAddDirNames write WriteAddDirNames;
Description
Declaration
property AddDiskSpan: Boolean read ReadAddDiskSpan write WriteAddDiskSpan;
Description
Declaration
property AddDiskSpanErase: Boolean read ReadAddDiskSpanErase write WriteAddDiskSpanErase;
Description
Declaration
property AddEncrypt: Boolean read ReadAddEncrypt write WriteAddEncrypt;
Description
Declaration
property AddHiddenFiles: Boolean read ReadAddHiddenFiles write WriteAddHiddenFiles;
Description
Declaration
function AddList(Action: Integer; ZipFile: String; FileNames: TStringList): Integer;
Description
Declaration
property AddRecurseDirs: Boolean read ReadAddRecurseDirs write WriteAddRecurseDirs;
Description
Declaration
property AddSeparateDirs: Boolean read ReadAddSeparateDirs write WriteAddSeparateDirs;
Description
Declaration
property AddZipTime: Boolean read ReadAddZipTime write WriteAddZipTime;
Description
Declaration
property ConfirmErase: Boolean read ReadConfirmErase write WriteConfirmErase;
Description
Declaration
constructor Create;
Description
Declaration
function Delete(ZipFile: String; FileName: String): Integer;
Description
Declaration
function DeleteList(ZipFile: String; FileNames: TStringList): Integer;
Description
Declaration
destructor Destroy;
Description
Declaration
function Extract(Action: Integer; ZipFile: String; FileName: String; BaseDir: String): Integer;
Description
Declaration
function ExtractList(Action: Integer; ZipFile: String; FileNames: TStringList; BaseDir: String): Integer;
Description
Declaration
property ExtrDirNames: Boolean read ReadExtrDirNames write WriteExtrDirNames;
Description
Declaration
property ExtrOverwrite: Boolean read ReadExtrOverwrite write WriteExtrOverwrite;
Description
Declaration
property HowToDelete: Integer read ReadHowToDelete write WriteHowToDelete;
Description
Declaration
property KeepFreeOnDisk1: Integer read ReadKeepFreeOnDisk1 write WriteKeepFreeOnDisk1;
Description
Declaration
function List(ZipFile: String): TStringList;
Description
Declaration
property MaxVolumeSize: Integer read ReadMaxVolumeSize write WriteMaxVolumeSize;
Description
Declaration
function Message(ZipFile: String): String;
Description
Declaration
property MinFreeVolumeSize: Integer read ReadMinFreeVolumeSize write WriteMinFreeVolumeSize;
Description
Declaration
property Password: String read ReadPassword write WritePassword;
Description
Declaration
function ReadAddCompLevel: Integer;
Description
Declaration
function ReadAddDirNames: Boolean;
Description
Declaration
function ReadAddDiskSpan: Boolean;
Description
Declaration
function ReadAddDiskSpanErase: Boolean;
Description
Declaration
function ReadAddEncrypt: Boolean;
Description
Declaration
function ReadAddHiddenFiles: Boolean;
Description
Declaration
function ReadAddRecurseDirs: Boolean;
Description
Declaration
function ReadAddSeparateDirs: Boolean;
Description
Declaration
function ReadAddZipTime: Boolean;
Description
Declaration
function ReadConfirmErase: Boolean;
Description
Declaration
function ReadExtrDirNames: Boolean;
Description
Declaration
function ReadExtrOverwrite: Boolean;
Description
Declaration
function ReadHowToDelete: Integer;
Description
Declaration
function ReadKeepFreeOnDisk1: Integer;
Description
Declaration
function ReadMaxVolumeSize: Integer;
Description
Declaration
function ReadMinFreeVolumeSize: Integer;
Description
Declaration
function ReadPassword: String;
Description
Declaration
function ReadSFXAskCmdLine: Boolean;
Description
Declaration
function ReadSFXAskFiles: Boolean;
Description
Declaration
function ReadSFXCaption: String;
Description
Declaration
function ReadSFXCommandLine: String;
Description
Declaration
function ReadSFXDefaultDir: String;
Description
Declaration
function ReadSFXHideOverwriteBox: Boolean;
Description
Declaration
function ReadSFXOverwriteMode: Integer;
Description
Declaration
function ReadSpan(SpanFile: String; var ZipFile: String): Integer;
Description
Declaration
function ReadTemp: String;
Description
Declaration
function SFX2ZIP(ZipFile: String): Integer;
Description
Declaration
property SFXAskCmdLine: Boolean read ReadSFXAskCmdLine write WriteSFXAskCmdLine;
Description
Declaration
property SFXAskFiles: Boolean read ReadSFXAskFiles write WriteSFXAskFiles;
Description
Declaration
property SFXCaption: String read ReadSFXCaption write WriteSFXCaption;
Description
Declaration
property SFXCommandLine: String read ReadSFXCommandLine write WriteSFXCommandLine;
Description
Declaration
property SFXDefaultDir: String read ReadSFXDefaultDir write WriteSFXDefaultDir;
Description
Declaration
property SFXHideOverwriteBox: Boolean read ReadSFXHideOverwriteBox write WriteSFXHideOverwriteBox;
Description
Declaration
property SFXOverwriteMode: Integer read ReadSFXOverwriteMode write WriteSFXOverwriteMode;
Description
Declaration
property Temp: String read ReadTemp write WriteTemp;
Description
Declaration
procedure WriteAddCompLevel(Value: Integer);
Description
Declaration
procedure WriteAddDirNames(Value: Boolean);
Description
Declaration
procedure WriteAddDiskSpan(Value: Boolean);
Description
Declaration
procedure WriteAddDiskSpanErase(Value: Boolean);
Description
Declaration
procedure WriteAddEncrypt(Value: Boolean);
Description
Declaration
procedure WriteAddHiddenFiles(Value: Boolean);
Description
Declaration
procedure WriteAddRecurseDirs(Value: Boolean);
Description
Declaration
procedure WriteAddSeparateDirs(Value: Boolean);
Description
Declaration
procedure WriteAddZipTime(Value: Boolean);
Description
Declaration
procedure WriteConfirmErase(Value: Boolean);
Description
Declaration
procedure WriteExtrDirNames(Value: Boolean);
Description
Declaration
procedure WriteExtrOverwrite(Value: Boolean);
Description
Declaration
procedure WriteHowToDelete(Value: Integer);
Description
Declaration
procedure WriteKeepFreeOnDisk1(Value: Integer);
Description
Declaration
procedure WriteMaxVolumeSize(Value: Integer);
Description
Declaration
procedure WriteMinFreeVolumeSize(Value: Integer);
Description
Declaration
procedure WritePassword(Value: String);
Description
Declaration
procedure WriteSFXAskCmdLine(Value: Boolean);
Description
Declaration
procedure WriteSFXAskFiles(Value: Boolean);
Description
Declaration
procedure WriteSFXCaption(Value: String);
Description
Declaration
procedure WriteSFXCommandLine(Value: String);
Description
Declaration
procedure WriteSFXDefaultDir(Value: String);
Description
Declaration
procedure WriteSFXHideOverwriteBox(Value: Boolean);
Description
Declaration
procedure WriteSFXOverwriteMode(Value: Integer);
Description
Declaration
function WriteSpan(ZipFile: String; SpanFile: String): Integer;
Description
Declaration
procedure WriteTemp(Value: String);
Description
Declaration
function ZIP2SFX(ZipFile: String): Integer;
Description