Unit 'fpsZipper' Package
[Overview][Constants][Types][Classes][Index] [#pl_fpspreadsheet]

TCompressor

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

Declaration

Source position: fpszipper.pp line 225

type TCompressor = class(TObject)

protected

  FInFile: TStream;

  

  FOutFile: TStream;

  

  FCrc32Val: LongWord;

  

  FBufferSize: LongWord;

  

  FOnPercent: Integer;

  

  FOnProgress: TProgressEvent;

  

  procedure UpdC32();

  

public

  constructor Create(); virtual;

  

  procedure Compress; virtual; abstract;

  

  class function ZipID; virtual; abstract;

  

  class function ZipVersionReqd; virtual; abstract;

  

  function ZipBitFlag; virtual; abstract;

  

  procedure Terminate;

  

  property BufferSize: LongWord; [r]

  

  property OnPercent: Integer; [rw]

  

  property OnProgress: TProgressEvent; [rw]

  

  property Crc32Val: LongWord; [rw]

  

  property Terminated: Boolean; [r]

  

end;

Inheritance

TCompressor

  

|

TObject



CT Web help

CodeTyphon Studio