Class TZipDir (unit ZipDir)

Inherits from

TComponent

'PK56'

Constructors


constructor Create(AOwner: TComponent);

size of zip dir entry in local zip directory


Functions

destructor Destroy;


procedure List;

run-time-only methods

Read thru all entries in the local Zip directory.


procedure FreeZipDirEntryRecords;

I am intentionally letting this be done again if you set the filename to the same name it already was.

function GetCount: Integer;

end for The caller will free the FZipContents TList itself, if needed

procedure SetZipFileName(Value: String);


Properties

property ZipFileName : String

properties for both design-time and run time } { At runtime: every time the filename is assigned a value, the ZipDir will be read.

property Count : Integer


property ZipContents : TList

force a re-read of Zip file } { run-time-only properties

Events

Variables

FZipContents : TList;


FZipFileName : String;



Constructors


constructor Create(AOwner: TComponent);

size of zip dir entry in local zip directory


Functions


destructor Destroy;


procedure List;

run-time-only methods

Read thru all entries in the local Zip directory. This is triggered by assigning a filename to your ZipDir component, or by calling this method directly.


procedure FreeZipDirEntryRecords;

I am intentionally letting this be done again if you set the filename to the same name it already was. This forces a refresh, in case the zip file has been changed.


function GetCount: Integer;

end for The caller will free the FZipContents TList itself, if needed


procedure SetZipFileName(Value: String);


Properties


property ZipFileName : String

properties for both design-time and run time } { At runtime: every time the filename is assigned a value, the ZipDir will be read. You don't need to call List yourself, unless you just want to refresh your list. Of course, if you set the ZipFileName in the property inspector, no auto List will later occur at runtime.


property Count : Integer


property ZipContents : TList

force a re-read of Zip file } { run-time-only properties


Events


Variables


FZipContents : TList;


FZipFileName : String;