Class TDBViewCombo (unit Viewcomb)

Inherits from

TCustomComboBox

Constructors


constructor Create(AOwner: TComponent);

Public declarations

---------------------------------------------------------------



Functions

destructor Destroy;

construct the data-link object

procedure Refresh;


procedure Change;

clear list

procedure ClearList;

read and fill the list of items (when dataset activeting

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


procedure ReadList;


procedure Scroll(Distance : Integer);

Protected declarations

function GetDataField: string;


function GetDataSource: TDataSource;

returns the name of the data field

function GetItemIndex : integer;

assigns new data source

.


procedure SetDataField(const Value: string);

returns reference to the data source

procedure SetDataSource(Value: TDataSource);

assigns name of data field

procedure SetItemIndex(Value : integer);


Properties

property Color :

Must be published before Items

property Ctl3D :


property DataField : string

Published declarations

property DataSource : TDataSource


property DragCursor :


property DragMode :


property DropDownCount :


property Enabled :


property Font :


property ItemHeight :


property Items :


property MaxLength :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShowHint :


property Sorted :


property Style :


property TabOrder :


property TabStop :


property Text :


property Visible :


property ItemIndex : integer


Events

event OnChange :


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnDrawItem :


event OnDropDown :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMeasureItem :


Variables

FChanging : boolean;


FDataLink : TViewComboLink;

Private declarations

FOldIndex : integer;



Constructors


constructor Create(AOwner: TComponent);

Public declarations

---------------------------------------------------------------


Functions


destructor Destroy;

construct the data-link object


procedure Refresh;


procedure Change;

clear list


procedure ClearList;

read and fill the list of items (when dataset activeting


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


procedure ReadList;


procedure Scroll(Distance : Integer);

Protected declarations


function GetDataField: string;


function GetDataSource: TDataSource;

returns the name of the data field


function GetItemIndex : integer;

assigns new data source

...then call inherited destructor


procedure SetDataField(const Value: string);

returns reference to the data source


procedure SetDataSource(Value: TDataSource);

assigns name of data field


procedure SetItemIndex(Value : integer);


Properties


property Color :

Must be published before Items


property Ctl3D :


property DataField : string

Published declarations


property DataSource : TDataSource


property DragCursor :


property DragMode :


property DropDownCount :


property Enabled :


property Font :


property ItemHeight :


property Items :


property MaxLength :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShowHint :


property Sorted :


property Style :


property TabOrder :


property TabStop :


property Text :


property Visible :


property ItemIndex : integer


Events


event OnChange :


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnDrawItem :


event OnDropDown :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMeasureItem :


Variables


FChanging : boolean;


FDataLink : TViewComboLink;

Private declarations


FOldIndex : integer;