| Class TNBSDBListBox (unit NBSDBLst) |
TCustomListBox
| Constructors |
Constructor Create(AOwner : TComponent);| Functions |
Destructor Destroy;
Procedure ActiveChange(Sender : TObject);
Procedure CheckExtraField;
Procedure DataChange(Sender : TObject);
Procedure FillItems;
Function GetCurrItem : String;
Function GetcurrValue : LongInt;
Function GetdataField : String;
Function GetDataSource : TDatasource;
procedure SetDataField(Value : String);
Procedure SetDataSource(Value : TDatasource);
Procedure SetExtraField(Value : String);| Properties |
property Align :
property BorderStyle :
property Color :
property Columns :
property Ctl3D :
property DataField : String
property DataSource : TDataSource
property DragCursor :
property DragMode :
property Enabled :
property ExtendedSelect :
property ExtraField : String
property Font :
property IntegralHeight :
property ItemHeight :
property MultiSelect :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Sorted :
property Style :
property TabOrder :
property TabStop :
property Visible :
property Current_Item : String
property Current_Value : LongInt
property ItemIndex :
property Items : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnDrawItem :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMeasureItem :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FDataLink : TFieldDataLink;
FExtraField : String;
FFillingItems : Boolean;| Constructors |
Constructor Create(AOwner : TComponent);| Functions |
Destructor Destroy;
Procedure ActiveChange(Sender : TObject);If execution gets here, ExtraField is not acceptable
Procedure CheckExtraField;
Procedure DataChange(Sender : TObject);
Procedure FillItems;
Function GetCurrItem : String;If DataSet is open, Check if the entered fieldtype is OK
Function GetcurrValue : LongInt;
Function GetdataField : String;
Function GetDataSource : TDatasource;
procedure SetDataField(Value : String);
Procedure SetDataSource(Value : TDatasource);
Procedure SetExtraField(Value : String);| Properties |
property Align :
property BorderStyle :
property Color :
property Columns :
property Ctl3D :
property DataField : String
property DataSource : TDataSource
property DragCursor :
property DragMode :
property Enabled :
property ExtendedSelect :
property ExtraField : String
property Font :
property IntegralHeight :
property ItemHeight :
property MultiSelect :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Sorted :
property Style :
property TabOrder :
property TabStop :
property Visible :
property Current_Item : String
property Current_Value : LongInt
property ItemIndex :
property Items : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnDrawItem :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMeasureItem :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FDataLink : TFieldDataLink;
FExtraField : String;
FFillingItems : Boolean;