| Class TRxDBLookupCombo (unit RXLookup) |
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure CloseUp(Accept: Boolean);
destructor Destroy;
procedure DropDown;
procedure ResetField;
procedure Click;
procedure CreateParams(var Params: TCreateParams);
function GetPicture(Current, Empty: Boolean; var TextMargin: Integer): TGraphic;
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure KeyPress(var Key: Char);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
procedure MouseMove(Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
procedure Paint;
procedure CMCancelMode(var Message: TCMCancelMode);
procedure CMCtl3DChanged(var Message: TMessage);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMGetDataLink(var Message: TMessage);
procedure CNKeyDown(var Message: TWMKeyDown);
procedure DisplayValueChanged;
function GetMinHeight: Integer;
function GetText: string;
procedure InvalidateText;
procedure KeyValueChanged;
procedure ListLinkActiveChanged;
procedure ListMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure StopTracking;
procedure TrackButton(X, Y: Integer);
procedure UpdateCurrentImage;
procedure UpdateDisplayEmpty(const Value: string);
procedure WMCancelMode(var Message: TMessage);
procedure WMGetDlgCode(var Message: TMessage);
procedure WMKillFocus(var Message: TWMKillFocus);
procedure WMSetCursor(var Message: TWMSetCursor);
procedure WMSize(var Message: TWMSize);| Properties |
property Color :
property Ctl3D :
property DataField :
property DataSource :
property DisplayEmpty :
property DragCursor :
property DragMode :
property DropDownAlign : TDropDownAlign
property DropDownCount : Integer
property DropDownWidth : Integer
property EmptyItemColor :
property EmptyValue :
property Enabled :
property EscapeClear : Boolean
property Font :
property IgnoreCase :
property ImeMode :
property ImeName :
property IndexSwitch :
property ItemHeight :
property ListStyle :
property LookupDisplay :
property LookupDisplayIndex :
property LookupField :
property LookupSource :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Visible :
property DisplayValue :
property IsDropDown : Boolean
property KeyValue :
property ListVisible : Boolean
property Text : string
property Value : | Events |
event OnChange :
event OnClick :
event OnCloseUp : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnDropDown : TNotifyEvent
event OnEndDrag :
event OnEnter :
event OnExit :
event OnGetImage :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
FAlignment : TAlignment;
FButtonWidth : Integer;
FDataList : TRxPopupDataList;
FDropDownAlign : TDropDownAlign;
FDropDownCount : Integer;
FDropDownWidth : Integer;
FEscapeClear : Boolean;
FListVisible : Boolean;
FOnCloseUp : TNotifyEvent;
FOnDropDown : TNotifyEvent;
FPressed : Boolean;
FSelImage : TPicture;
FSelMargin : Integer;
FTracking : Boolean;| Constructors |
constructor Create(AOwner: TComponent);TRxDBLookupCombo
| Functions |
procedure CloseUp(Accept: Boolean);
destructor Destroy;GetMinHeight
procedure DropDown;
procedure ResetField;direct drawing Canvas.TextRect(R, X, Max(2, (R.Bottom + R.Top - Canvas.TextHeight('w')) div 2), AText); if Image <> nil then begin ImageRect := R; ImageRect.Right := ImageRect.Left + TextMargin + 2; DrawPicture(Canvas, ImageRect, Image); end;
procedure Click;
procedure CreateParams(var Params: TCreateParams);
function GetPicture(Current, Empty: Boolean; var TextMargin: Integer): TGraphic;
procedure KeyDown(var Key: Word; Shift: TShiftState);
procedure KeyPress(var Key: Char);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
procedure MouseMove(Shift: TShiftState; X, Y: Integer);FListActive
procedure MouseUp(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
procedure Paint;
procedure CMCancelMode(var Message: TCMCancelMode);
procedure CMCtl3DChanged(var Message: TMessage);
procedure CMEnabledChanged(var Message: TMessage);
procedure CMFontChanged(var Message: TMessage);
procedure CMGetDataLink(var Message: TMessage);
procedure CNKeyDown(var Message: TWMKeyDown);
procedure DisplayValueChanged;
function GetMinHeight: Integer;FDataList.KeyValueChanged;
function GetText: string;
procedure InvalidateText;
procedure KeyValueChanged;
procedure ListLinkActiveChanged;
procedure ListMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure StopTracking;
procedure TrackButton(X, Y: Integer);
procedure UpdateCurrentImage;
procedure UpdateDisplayEmpty(const Value: string);
procedure WMCancelMode(var Message: TMessage);
procedure WMGetDlgCode(var Message: TMessage);
procedure WMKillFocus(var Message: TWMKillFocus);
procedure WMSetCursor(var Message: TWMSetCursor);
procedure WMSize(var Message: TWMSize);| Properties |
property Color :
property Ctl3D :
property DataField :
property DataSource :
property DisplayEmpty :
property DragCursor :
property DragMode :
property DropDownAlign : TDropDownAlign
property DropDownCount : Integer
property DropDownWidth : Integer
property EmptyItemColor :
property EmptyValue :
property Enabled :
property EscapeClear : Boolean
property Font :
property IgnoreCase :
property ImeMode :
property ImeName :
property IndexSwitch :
property ItemHeight :
property ListStyle :
property LookupDisplay :
property LookupDisplayIndex :
property LookupField :
property LookupSource :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Visible :
property DisplayValue :
property IsDropDown : Boolean
property KeyValue :
property ListVisible : Boolean
property Text : string
property Value : | Events |
event OnChange :
event OnClick :
event OnCloseUp : TNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnDropDown : TNotifyEvent
event OnEndDrag :
event OnEnter :
event OnExit :
event OnGetImage :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
FAlignment : TAlignment;
FButtonWidth : Integer;
FDataList : TRxPopupDataList;
FDropDownAlign : TDropDownAlign;
FDropDownCount : Integer;
FDropDownWidth : Integer;
FEscapeClear : Boolean;
FListVisible : Boolean;
FOnCloseUp : TNotifyEvent;
FOnDropDown : TNotifyEvent;
FPressed : Boolean;
FSelImage : TPicture;
FSelMargin : Integer;
FTracking : Boolean;