Class TBufferedFilter (unit Filters)

Inherits from

TFilter

Constructors


constructor Create(AStream: TStream; BufSize: Word);

************************************ TBufferedFilter ************************************


Functions

destructor Destroy;


procedure Flush;


function Read(var Buffer; Count: LongInt): LongInt;


function Seek(Offset: LongInt; Origin: Word): LongInt;


function Write(const Buffer; Count: LongInt): LongInt;

test on read only streams

procedure LoadBuffer;


procedure RepositionBuffer;

Read at EOF

procedure SetStream(Value: TStream);


procedure SetBufStart(Value: LongInt);


Properties

property BufStart : LongInt


Events

Variables

FBasePos : LongInt;


FBaseSize : LongInt;


FBufCnt : Word;


FBufEnd : LongInt;


FBuffer : PByteArray;


FBufModified : Boolean;


FBufSize : Word;


FBufStart : LongInt;


FCurPos : LongInt;



Constructors


constructor Create(AStream: TStream; BufSize: Word);

************************************ TBufferedFilter ************************************


Functions


destructor Destroy;


procedure Flush;


function Read(var Buffer; Count: LongInt): LongInt;


function Seek(Offset: LongInt; Origin: Word): LongInt;


function Write(const Buffer; Count: LongInt): LongInt;

test on read only streams


procedure LoadBuffer;


procedure RepositionBuffer;

Read at EOF


procedure SetStream(Value: TStream);


procedure SetBufStart(Value: LongInt);


Properties


property BufStart : LongInt


Events


Variables


FBasePos : LongInt;


FBaseSize : LongInt;


FBufCnt : Word;


FBufEnd : LongInt;


FBuffer : PByteArray;


FBufModified : Boolean;


FBufSize : Word;


FBufStart : LongInt;


FCurPos : LongInt;