Unit 'Zipper'	Package
[Overview][Constants][Types][Classes][Index]	[#paszlib]

TDeCompressor

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: zipper.pp line 234

type TDeCompressor = class(TObject)

protected

FInFile: TStream;

FOutFile: TStream;

FCrc32Val: LongWord;

FBufferSize: LongWord;

FOnPercent: Integer;

FOnProgress: TProgressEvent;

FOnProgressEx: TProgressEventEx;

FTotPos: Int64;

FTotSize: Int64;

FTerminated: Boolean;

procedure UpdC32();

public

constructor Create(); virtual;

procedure DeCompress; virtual; abstract;

procedure Terminate;

class function ZipID; virtual; abstract;

property BufferSize: LongWord; [r]

property OnPercent: Integer; [rw]

property OnProgress: TProgressEvent; [rw]

property OnProgressEx: TProgressEventEx; [rw]

property Crc32Val: LongWord; [rw]

property Terminated: Boolean; [r]

end;

Inheritance

TDeCompressor

|

TObject