Class TDBFinderEdit (unit DBFEdit) |
Inherits from
TCustomEdit
constructor Create(Owner: TComponent);
- Construction and destruction
destructor Destroy;
Initialize properties
procedure ClearYoungerSibs;
Other methods Other methods
procedure Click;
for
procedure CmGetDataLink(var Msg: TMessage);
Make changing the control's text faster by making sure it's selected
procedure DoExit;
Data-aware controls must respond to the Cm_GetDataLink message by returning
a datalink reference
procedure DoLocate;
Prevent departure if record must be found
procedure EditingChange(Sender: TObject);
Allow post-search events
function GetDataField: string;
function GetDataSource: TDataSource;
Field access methods Property access methods
function GetValue: variant;
procedure KeyPress(var Key: char);
TDBFinderEdit can't be used for data entry, so make this clear by
disabling it if the DataSet is in editing mode
procedure KeyUp(var Key: word; Shift: TShiftState);
case
procedure Notification(Component: TComponent; Operation: TOperation);
If a valid key has been pressed and IncrementalSearch is set to True, then
call ClearYoungerSibs if appropriate and do the find
procedure RecordChange(Sender: TObject);
If the DataSource component is removed from the form, clear the
DataSource pointer in the datalink
procedure SetDataField(const Field: string);
Request notification if the DataSource component is removed from the form
procedure SetDataSource(DataSource: TDataSource);
property AutoClear : boolean
property AutoSelect :
Inherited properties
property AutoSize :
property BorderStyle :
property CharCase :
property Color :
property Ctl3D :
property DataField : string
property DataSource : TDataSource
property DragCursor :
property DragMode :
property Enabled :
property EnterAsTab : boolean
property FilterMode : TFilterMode
property Font :
property GroupIndex : cardinal
property HideSelection :
property IncrementalSearch : boolean
property LocateOptions : TLocateOptions
property MaxLength :
property MustFind : boolean
property OEMConvert :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PasswordChar :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Text :
property Visible :
property Found : boolean
property Value : variant
event OnChange :
Inherited events
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnFound : TNotifyEvent
Events
event OnFoundElsewhere : TNotifyEvent
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnNotFound : TNotifyEvent
event OnStartDrag :
fAutoClear : boolean;
fDataLink : TFieldDataLink;
fEnterAsTab : boolean;
fFilterMode : TFilterMode;
fFound : boolean;
fGroupIndex : cardinal;
fIncrementalSearch : boolean;
fLocateOptions : TLocateOptions;
fMustFind : boolean;
fOnFound : TNotifyEvent;
fOnFoundElsewhere : TNotifyEvent;
fOnNotFound : TNotifyEvent;
constructor Create(Owner: TComponent);
Construction and destruction
destructor Destroy;
Initialize properties
procedure ClearYoungerSibs;
Other methods
Other methods
procedure Click;
for
procedure CmGetDataLink(var Msg: TMessage);
Make changing the control's text faster by making sure it's selected
procedure DoExit;
Data-aware controls must respond to the Cm_GetDataLink message by returning
a datalink reference
procedure DoLocate;
Prevent departure if record must be found
procedure EditingChange(Sender: TObject);
Allow post-search events
function GetDataField: string;
function GetDataSource: TDataSource;
Field access methods
Property access methods
function GetValue: variant;
procedure KeyPress(var Key: char);
TDBFinderEdit can't be used for data entry, so make this clear by
disabling it if the DataSet is in editing mode
procedure KeyUp(var Key: word; Shift: TShiftState);
case
procedure Notification(Component: TComponent; Operation: TOperation);
If a valid key has been pressed and IncrementalSearch is set to True, then
call ClearYoungerSibs if appropriate and do the find
procedure RecordChange(Sender: TObject);
If the DataSource component is removed from the form, clear the
DataSource pointer in the datalink
procedure SetDataField(const Field: string);
Request notification if the DataSource component is removed from the form
procedure SetDataSource(DataSource: TDataSource);
property AutoClear : boolean
property AutoSelect :
Inherited properties
property AutoSize :
property BorderStyle :
property CharCase :
property Color :
property Ctl3D :
property DataField : string
property DataSource : TDataSource
property DragCursor :
property DragMode :
property Enabled :
property EnterAsTab : boolean
property FilterMode : TFilterMode
property Font :
property GroupIndex : cardinal
property HideSelection :
property IncrementalSearch : boolean
property LocateOptions : TLocateOptions
property MaxLength :
property MustFind : boolean
property OEMConvert :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PasswordChar :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Text :
property Visible :
property Found : boolean
property Value : variant
event OnChange :
Inherited events
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnFound : TNotifyEvent
Events
event OnFoundElsewhere : TNotifyEvent
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnNotFound : TNotifyEvent
event OnStartDrag :
fAutoClear : boolean;
fDataLink : TFieldDataLink;
fEnterAsTab : boolean;
fFilterMode : TFilterMode;
fFound : boolean;
fGroupIndex : cardinal;
fIncrementalSearch : boolean;
fLocateOptions : TLocateOptions;
fMustFind : boolean;
fOnFound : TNotifyEvent;
fOnFoundElsewhere : TNotifyEvent;
fOnNotFound : TNotifyEvent;