Class TDSComboBox (unit DSComboBox) |
Inherits from
TCustomComboBox
constructor Create(AOwner:TComponent);
- Get or get parameters value
procedure Close;
Open query and fill ComboboxReturn SQL property
destructor Destroy;
function FieldByName(FieldName:String):TField;
Close DSCombobox
function Find(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
Get field value by it's name
procedure FindSet(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions);
procedure Loaded;
procedure Open;
Public declarations Set parameters' value
function ParamByName(ParamName:String):TParam;
Get value by field name
procedure Refresh;
Close query and clear Combobox
function GetActive:Boolean;
function GetSql:TStringList;
Set SQL property
procedure SetActive(Status:Boolean);
procedure SetSql(Sql:TStringList);
Open DSCombobox
property Color :
property Ctl3D :
property DataBaseName : String
Must be published before Items
property DiplayedField : String
property DragCursor :
property DragMode :
property DropDownCount :
property Enabled :
property Font :
property MaxLength :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property SQL : TStringList
Set or get database name
property Style :
Published declarations
property Text :
property Visible :
property Active : Boolean
property Items :
event OnChange :
Set or get field which displayed in combobox
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 :
event OnStartDrag :
FDataBaseName : String;
FDisplayedField : String;
FQuery : TQuery;
Private declarations
constructor Create(AOwner:TComponent);
Get or get parameters value
procedure Close;
Open query and fill Combobox
Return SQL property
destructor Destroy;
function FieldByName(FieldName:String):TField;
Close DSCombobox
function Find(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
Get field value by it's name
procedure FindSet(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions);
procedure Loaded;
procedure Open;
Public declarations
Set parameters' value
function ParamByName(ParamName:String):TParam;
Get value by field name
procedure Refresh;
Close query and clear Combobox
function GetActive:Boolean;
function GetSql:TStringList;
Set SQL property
procedure SetActive(Status:Boolean);
procedure SetSql(Sql:TStringList);
Open DSCombobox
property Color :
property Ctl3D :
property DataBaseName : String
Must be published before Items
property DiplayedField : String
property DragCursor :
property DragMode :
property DropDownCount :
property Enabled :
property Font :
property MaxLength :
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property SQL : TStringList
Set or get database name
property Style :
Published declarations
property Text :
property Visible :
property Active : Boolean
property Items :
event OnChange :
Set or get field which displayed in combobox
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 :
event OnStartDrag :
FDataBaseName : String;
FDisplayedField : String;
FQuery : TQuery;
Private declarations