Class TFilterObject (unit Fltcback)

Inherits from

TObject

Object which is passed to the users Filter callback, giving access to the BDEs raw data for a record in a useable state.

Constructors


constructor Create;

***************************************************************************** ** TFilterObject Object functions/Methods/Procedures ******************************************************************************) (* ** Constructor for client callback object


Functions

destructor Destroy;

** Destructor for client callback object.

function FieldIsBlank(FieldName: openstring): boolean;

** Function to decide whether the passed fields data is blank

function GetBlobData(FieldName: openstring): TFilterBlobStream;

** Function to get Raw data for passed field name.

function GetFieldData(FieldName: openstring): TRawData;

** Function to get Raw data for passed field name.

function IsValidBlobField(FieldName: openstring): boolean;

** Function to decide whether passed field name exists in the table

function IsValidField(FieldName: openstring): boolean;

** Function to decide whether passed field name exists in the table

procedure LoadFields(Table: TTable);

Stream to return for blob data

** Loads internal list with all field names in passed table.


Properties

property PhysicalRecordNum : Longint

Loads all Field Names into list

Events

Variables

FFieldList : TStringList;

Pointer to Table being filtered

FPhysRecNum : Longint;

Pointer to BDE record structure

FpRecBuf : pointer;

Pointer to RAW data handling object

FRaw : TRawData;

List of All Field names in Table

FRawTable : TTable;


FReturnStream : TFilterBlobStream;

Physical record number


Constructors


constructor Create;

***************************************************************************** ** TFilterObject Object functions/Methods/Procedures ******************************************************************************) (* ** Constructor for client callback object


Functions


destructor Destroy;

** Destructor for client callback object. Release all associated objects ** resources.


function FieldIsBlank(FieldName: openstring): boolean;

** Function to decide whether the passed fields data is blank


function GetBlobData(FieldName: openstring): TFilterBlobStream;

** Function to get Raw data for passed field name.


function GetFieldData(FieldName: openstring): TRawData;

** Function to get Raw data for passed field name.


function IsValidBlobField(FieldName: openstring): boolean;

** Function to decide whether passed field name exists in the table


function IsValidField(FieldName: openstring): boolean;

** Function to decide whether passed field name exists in the table


procedure LoadFields(Table: TTable);

Stream to return for blob data

** Loads internal list with all field names in passed table. The list is in ** the same order as the fields are in the file definition, allowing the ** list item number plus one to be used in the DbiGetField function.


Properties


property PhysicalRecordNum : Longint

Loads all Field Names into list


Events


Variables


FFieldList : TStringList;

Pointer to Table being filtered


FPhysRecNum : Longint;

Pointer to BDE record structure


FpRecBuf : pointer;

Pointer to RAW data handling object


FRaw : TRawData;

List of All Field names in Table


FRawTable : TTable;


FReturnStream : TFilterBlobStream;

Physical record number