Unit LZExplic

Classes

Functions

GetChiefLZDLLHandle - unload the DLL - call this last, after doing the LZ functions

/////////////////////////////////////////////
LoadChiefLZDLL - /////////////////////////////////////////////} {/////////////////////////////////////////////
UnloadChiefLZDLL - load the ChiefLZ DLL - Win16 returns 0 if successful, and something else if not successful - Win32 returns True if successful and False otherwise If False, the error code is obtained by calling GetLastError() - you can supply a new DLL name to use instead of the default "ChiefLZ.

Types

Constants

Variables

ChiefLZDLLVersion
GetChiefLZArchiveInfo
GetChiefLZArchiveSize
GetChiefLZFileName
GetChiefLZFileSize
GetFullLZName
GetLZMarkerChar
IsChiefLZArchive
IsChiefLZFile
LZArchive
LZCompress
LZCompressEx
LZDearchive
LZDecompress
LZDecompressEx
SetLZMarkerChar


Functions


Function GetChiefLZDLLHandle: THandle;

unload the DLL - call this last, after doing the LZ functions

/////////////////////////////////////////////


Function LoadChiefLZDLL(DLLName: PChar): {$ifdef Win32} BOOL ;

/////////////////////////////////////////////} {/////////////////////////////////////////////

Function UnloadChiefLZDLL: {$ifdef Win32} BOOL ;

load the ChiefLZ DLL - Win16 returns 0 if successful, and something else if not successful - Win32 returns True if successful and False otherwise If False, the error code is obtained by calling GetLastError() - you can supply a new DLL name to use instead of the default "ChiefLZ.DLL". Call this first, before doing anything

/////////////////////////////////////////////} {$ifdef Win32


Types


Constants


Variables

ChiefLZDLLVersion : Function: Integer

GetChiefLZArchiveInfo : Function(const ArchName: {$ifdef Win32} string; var Header: TChiefLZArchiveHeader): boolean

GetChiefLZArchiveSize : Function(const ArchName: {$ifdef Win32} string ): LongInt

GetChiefLZFileName : Function(const fName: string): string

GetChiefLZFileSize : Function(fName: {$ifdef Win32} string ): LongInt

GetFullLZName : Function(Const X: TChiefLZArchiveHeader; Index: Integer): String

GetLZMarkerChar : Function: Char

IsChiefLZArchive : Function(const fName: {$ifdef Win32} string ): boolean

exported functions

IsChiefLZFile : Function(const fName: {$ifdef Win32} string ): boolean

LZArchive : Function(const fSpec, ArchName: {$ifdef Win32} string ; LZRecurseDirs: TLZRecurse; aProc: TLZReportProc): LongInt

LZCompress : Function(const {$ifdef Win32} Source, Dest: string ; LZQuestion: TLZQuestionFunc; aProc: TLZReportProc): LongInt

LZCompressEx : Function(const {$ifdef Win32} Name: string ; ReplaceQuestion: TLZQuestionFunc; aProc: TLZReportProc): LongInt

LZDearchive : Function(ArchName: {$ifdef Win32} string ; {$ifdef Win32} DefDir: string ; LZQuestion: TLZQuestionFunc; aProc: TLZReportProc; aRename: TLZRenameFunc): LongInt

LZDecompress : Function({$ifdef Win32} Source, Dest: string ; LZQuestion: TLZQuestionFunc; aProc: TLZReportProc): LongInt

LZDecompressEx : Function({$ifdef Win32} Name: string ; ReplaceQuestion: TLZQuestionFunc; aProc: TLZReportProc): LongInt

SetLZMarkerChar : Procedure(const NewChar: Char)