Class TCustomDBComboBox (unit RxDBComb)

Inherits from

TCustomComboBox

TCustomDBComboBox

Constructors


constructor Create(AOwner: TComponent);

TCustomDBComboBox


Functions

destructor Destroy;


procedure Change;


procedure Click;


procedure ComboWndProc(var Message: TMessage; ComboWnd: HWnd; ComboProc: Pointer);

Restore text} {$IFDEF WIN32

procedure CreateWnd;


procedure DropDown;


procedure KeyDown(var Key: Word; Shift: TShiftState);


procedure KeyPress(var Key: Char);


procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure SetStyle(Value: TComboBoxStyle);


procedure WndProc(var Message: TMessage);


procedure CMExit(var Message: TCMExit);


procedure CMGetDataLink(var Message: TMessage);


procedure DataChange(Sender: TObject);


procedure EditingChange(Sender: TObject);


function GetComboText: string;


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetComboText(const Value: string);


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetEditReadOnly;


procedure SetItems(Value: TStrings);


procedure SetReadOnly(Value: Boolean);


procedure UpdateData(Sender: TObject);


procedure WMPaint(var Message: TWMPaint);


Properties

property Field : TField


property Items :


property Text :


property ComboText : string


property DataField : string


property DataSource : TDataSource


property ReadOnly : Boolean


Events

Variables

FDataLink : TFieldDataLink;


FPaintControl : TPaintControl;



Constructors


constructor Create(AOwner: TComponent);

TCustomDBComboBox


Functions


destructor Destroy;


procedure Change;


procedure Click;


procedure ComboWndProc(var Message: TMessage; ComboWnd: HWnd; ComboProc: Pointer);

Restore text} {$IFDEF WIN32


procedure CreateWnd;


procedure DropDown;


procedure KeyDown(var Key: Word; Shift: TShiftState);


procedure KeyPress(var Key: Char);


procedure Notification(AComponent: TComponent; Operation: TOperation);


procedure SetStyle(Value: TComboBoxStyle);


procedure WndProc(var Message: TMessage);


procedure CMExit(var Message: TCMExit);


procedure CMGetDataLink(var Message: TMessage);


procedure DataChange(Sender: TObject);


procedure EditingChange(Sender: TObject);


function GetComboText: string;


function GetDataField: string;


function GetDataSource: TDataSource;


function GetField: TField;


function GetReadOnly: Boolean;


procedure SetComboText(const Value: string);


procedure SetDataField(const Value: string);


procedure SetDataSource(Value: TDataSource);


procedure SetEditReadOnly;


procedure SetItems(Value: TStrings);


procedure SetReadOnly(Value: Boolean);


procedure UpdateData(Sender: TObject);


procedure WMPaint(var Message: TWMPaint);


Properties


property Field : TField


property Items :


property Text :


property ComboText : string


property DataField : string


property DataSource : TDataSource


property ReadOnly : Boolean


Events


Variables


FDataLink : TFieldDataLink;


FPaintControl : TPaintControl;