Class TCabinetReader (unit Cabinet)

Inherits from

TCabinetInterface

TCabinetReader class -- for decompressing files from an existing cabinet file Open Opens a cabinet for reading. The associated file handler specified in the FileHandler property is used to open the cabinet. The return value is True if the specified file is a valid cabinet file, False if not

Constructors


constructor Create (AOwner : TComponent);



Functions

destructor Destroy;


procedure ExtractFiles (const FileName, DestinationPath : string; Flags : Integer);


function IsCabinet (const FileName : string; var CabInfo : TFDICABINETINFO) : Boolean;


procedure ContextNeeded;


procedure DestroyContext;

TCabinetReader

procedure DoCabinetInfo (const CabinetName, CabinetDisk, CabinetPath : string; SetId, CabinetNumber : Longint; var Abort : Boolean);


procedure DoCloseCopiedFile (const FileName : string; FileHandle : Integer; Date, Time, Attribs : Smallint; FolderIndex : Integer; Execute : Boolean; var Abort : Boolean);


procedure DoCopyFile (const FileName : string; UncompressedSize : Longint; Date, Time, Attribs : Smallint; var Action : TFileCopyAction; var DestFileHandle : Integer);


procedure DoNextCabinet (const NextCabinetName, NextCabinetDisk : string; var CabinetPath : string; ErrorIndication : TFDIERROR; var Abort : Boolean);


procedure DoPartialFile (const FileName, FirstCabinetName, FirstCabinetDisk : string; var Abort : Boolean);


Properties

property CpuType : TCpuType


property DestinationPath : string


property FileHandler :


property FileSupport : Boolean


property Context : HFDI


Events

event OnCabinetInfo : TCabinetInfoEvent


event OnCloseCopiedFile : TCloseCopiedFileEvent


event OnCopyFile : TCopyFileEvent


event OnNextCabinet : TNextCabinetEvent


event OnPartialFile : TPartialFileEvent


Variables

FContext : HFDI;


FCpuType : TCpuType;


FDestinationPath : string;


FFileSupport : Boolean;


FOnCabinetInfo : TCabinetInfoEvent;


FOnCloseCopiedFile : TCloseCopiedFileEvent;


FOnCopyFile : TCopyFileEvent;


FOnNextCabinet : TNextCabinetEvent;


FOnPartialFile : TPartialFileEvent;



Constructors


constructor Create (AOwner : TComponent);


Functions


destructor Destroy;


procedure ExtractFiles (const FileName, DestinationPath : string; Flags : Integer);


function IsCabinet (const FileName : string; var CabInfo : TFDICABINETINFO) : Boolean;


procedure ContextNeeded;


procedure DestroyContext;

TCabinetReader


procedure DoCabinetInfo (const CabinetName, CabinetDisk, CabinetPath : string; SetId, CabinetNumber : Longint; var Abort : Boolean);


procedure DoCloseCopiedFile (const FileName : string; FileHandle : Integer; Date, Time, Attribs : Smallint; FolderIndex : Integer; Execute : Boolean; var Abort : Boolean);


procedure DoCopyFile (const FileName : string; UncompressedSize : Longint; Date, Time, Attribs : Smallint; var Action : TFileCopyAction; var DestFileHandle : Integer);


procedure DoNextCabinet (const NextCabinetName, NextCabinetDisk : string; var CabinetPath : string; ErrorIndication : TFDIERROR; var Abort : Boolean);


procedure DoPartialFile (const FileName, FirstCabinetName, FirstCabinetDisk : string; var Abort : Boolean);


Properties


property CpuType : TCpuType


property DestinationPath : string


property FileHandler :


property FileSupport : Boolean


property Context : HFDI


Events


event OnCabinetInfo : TCabinetInfoEvent


event OnCloseCopiedFile : TCloseCopiedFileEvent


event OnCopyFile : TCopyFileEvent


event OnNextCabinet : TNextCabinetEvent


event OnPartialFile : TPartialFileEvent


Variables


FContext : HFDI;


FCpuType : TCpuType;


FDestinationPath : string;


FFileSupport : Boolean;


FOnCabinetInfo : TCabinetInfoEvent;


FOnCloseCopiedFile : TCloseCopiedFileEvent;


FOnCopyFile : TCopyFileEvent;


FOnNextCabinet : TNextCabinetEvent;


FOnPartialFile : TPartialFileEvent;