Class TFilterCallback (unit Fltcback) |
Inherits from
TComponent
Actual component doing the work.
constructor Create(AOwner: TComponent);
-
** Create component which handles the BDE callbacks.
destructor Destroy;
** Destroy resources used by component
procedure EndFilter;
** Terminates filter
procedure StartFilter;
** Starts filter active
function GetFilteredCount: Longint;
Users callback event handler } {$ifdef BDEFilterCount
** Returns the exact amount of records after the filter has been applied
procedure Notification(AComponent: TComponent; Operation: TOperation);
** Removes our reference to the selected table if it is being removed
procedure SetActive(Value: boolean);
** Activate or Deactivate the filter callback.
procedure SetTable(Value: TTable);
** When a table name is entered, read in all field names.
property Active : boolean
property FilteredRecordCount : Longint
property Table : TTable
event OnFilter : TFilterEvent
FActive : boolean;
FFilterObject : TFilterObject;
Whether or not the filter is active
FOnFilter : TFilterEvent;
Handle of Filter when applied
FTable : TTable;
Pointer to our record handler
hFilter : hDbiFilter;
Table Filter to be applied to
constructor Create(AOwner: TComponent);
** Create component which handles the BDE callbacks.
destructor Destroy;
** Destroy resources used by component
procedure EndFilter;
** Terminates filter
procedure StartFilter;
** Starts filter active
function GetFilteredCount: Longint;
Users callback event handler } {$ifdef BDEFilterCount
** Returns the exact amount of records after the filter has been applied
procedure Notification(AComponent: TComponent; Operation: TOperation);
** Removes our reference to the selected table if it is being removed
procedure SetActive(Value: boolean);
** Activate or Deactivate the filter callback.
procedure SetTable(Value: TTable);
** When a table name is entered, read in all field names.
** Whilst then component is created, the LoadFields method cannot be called
** because the dependant variables and objects have not been completely
** created. This eventuality is taken care of by the SetActive method
property Active : boolean
property FilteredRecordCount : Longint
property Table : TTable
event OnFilter : TFilterEvent
FActive : boolean;
FFilterObject : TFilterObject;
Whether or not the filter is active
FOnFilter : TFilterEvent;
Handle of Filter when applied
FTable : TTable;
Pointer to our record handler
hFilter : hDbiFilter;
Table Filter to be applied to