Class TCustomDBLookupControl (unit dbTreeCBox) |
Inherits from
TCustomControl
constructor Create(AOwner: TComponent);
destructor Destroy;
function CanModify: Boolean;
* Moved (virtual) procedures from private to protected:
procedure DataLinkRecordChanged(Field: TField);
* Moved from private to protected and made virtual:
function GetBorderSize: Integer;
function GetTextHeight: Integer;
procedure KeyValueChanged;
procedure ListLinkActiveChanged;
procedure ListLinkDataChanged;
function LocateKey: Boolean;
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure SelectKeyValue(const Value: Variant);
procedure CheckNotCircular;
procedure CheckNotLookup;
Delphi >= 3.
procedure DataLinkActiveChanged;
Delphi >= 3.
function GetDataSource: TDataSource;
function GetKeyFieldName: string;
function GetListSource: TDataSource;
function GetReadOnly: Boolean;
procedure SetDataFieldName(const Value: string);
procedure SetDataSource(Value: TDataSource);
procedure SetKeyFieldName(const Value: string);
procedure SetKeyValue(const Value: Variant);
procedure SetListFieldName(const Value: string);
procedure SetListSource(Value: TDataSource);
procedure SetLookupMode(Value: Boolean);
procedure SetReadOnly(Value: Boolean);
procedure WMGetDlgCode(var Message: TMessage);
procedure WMKillFocus(var Message: TMessage);
procedure WMSetFocus(var Message: TMessage);
property DataField : string
property DataSource : TDataSource
property FFDataField : TField
property FFDataFieldName : string
property FFDataLink : TDataSourceLink
property FFFocused : Boolean
property FFKeyField : TField
property FFListActive : Boolean
property FFListField : TField
property FFListLink : TListSourceLink
property FFLookupMode : Boolean
* Read private "Fxxx" with protected "FFxxx":
property FFSearchText : string
* Read and write private "Fxxx" with protected "FFxxx":
property KeyField : string
property KeyValue : Variant
property ListField : string
property ListFieldIndex : Integer
property ListSource : TDataSource
property ParentColor :
property ReadOnly : Boolean
property TabStop :
FDataField : TField;
FDataFieldName : string;
FDataLink : TDataSourceLink;
FFocused : Boolean;
FKeyField : TField;
FKeyFieldName : string;
FKeyValue : Variant;
FListActive : Boolean;
FListField : TField;
FListFieldIndex : Integer;
FListFieldName : string;
FListFields : TList;
FListLink : TListSourceLink;
FLookupMode : Boolean;
FLookupSource : TDataSource;
FMasterField : TField;
FSearchText : string;
constructor Create(AOwner: TComponent);
destructor Destroy;
function CanModify: Boolean;
* Moved (virtual) procedures from private to protected:
procedure DataLinkRecordChanged(Field: TField);
* Moved from private to protected and made virtual:
function GetBorderSize: Integer;
function GetTextHeight: Integer;
procedure KeyValueChanged;
procedure ListLinkActiveChanged;
procedure ListLinkDataChanged;
function LocateKey: Boolean;
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure SelectKeyValue(const Value: Variant);
procedure CheckNotCircular;
procedure CheckNotLookup;
Delphi >= 3.0:
procedure DataLinkActiveChanged;
Delphi >= 3.0:
function GetDataSource: TDataSource;
function GetKeyFieldName: string;
function GetListSource: TDataSource;
function GetReadOnly: Boolean;
procedure SetDataFieldName(const Value: string);
procedure SetDataSource(Value: TDataSource);
procedure SetKeyFieldName(const Value: string);
procedure SetKeyValue(const Value: Variant);
procedure SetListFieldName(const Value: string);
procedure SetListSource(Value: TDataSource);
procedure SetLookupMode(Value: Boolean);
procedure SetReadOnly(Value: Boolean);
procedure WMGetDlgCode(var Message: TMessage);
procedure WMKillFocus(var Message: TMessage);
procedure WMSetFocus(var Message: TMessage);
property DataField : string
property DataSource : TDataSource
property FFDataField : TField
property FFDataFieldName : string
property FFDataLink : TDataSourceLink
property FFFocused : Boolean
property FFKeyField : TField
property FFListActive : Boolean
property FFListField : TField
property FFListLink : TListSourceLink
property FFLookupMode : Boolean
* Read private "Fxxx" with protected "FFxxx":
property FFSearchText : string
* Read and write private "Fxxx" with protected "FFxxx":
property KeyField : string
property KeyValue : Variant
property ListField : string
property ListFieldIndex : Integer
property ListSource : TDataSource
property ParentColor :
property ReadOnly : Boolean
property TabStop :
FDataField : TField;
FDataFieldName : string;
FDataLink : TDataSourceLink;
FFocused : Boolean;
FKeyField : TField;
FKeyFieldName : string;
FKeyValue : Variant;
FListActive : Boolean;
FListField : TField;
FListFieldIndex : Integer;
FListFieldName : string;
FListFields : TList;
FListLink : TListSourceLink;
FLookupMode : Boolean;
FLookupSource : TDataSource;
FMasterField : TField;
FSearchText : string;