dblookupeh.hpp

最新的 DBGRIDEH4.0

	DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
	DYNAMIC void __fastcall KeyPress(char &Key);
	virtual void __fastcall KeyValueChanged(void);
	DYNAMIC void __fastcall KeyUp(Word &Key, Classes::TShiftState Shift);
	virtual void __fastcall ListLinkDataChanged(void);
	virtual void __fastcall Loaded(void);
	DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	virtual void __fastcall ProcessSearchStr(AnsiString Str);
	virtual void __fastcall SelectKeyValue(const Variant &Value);
	HIDESBASE void __fastcall SetEditText(AnsiString Value);
	virtual void __fastcall SetFocused(bool Value);
	virtual void __fastcall SpecRowChanged(System::TObject* Sender);
	virtual void __fastcall UpdateDataFields(void);
	virtual void __fastcall UpdateListFields(void);
	virtual void __fastcall UpdateListLinkDataSource(void);
	__property TDataSourceLinkEh* DataLink = {read=GetDataLink};
	__property bool ListActive = {read=FListActive, nodefault};
	__property Classes::TList* ListFields = {read=FListFields};
	__property TListSourceLinkEh* ListLink = {read=FListLink};
	__property Toolctrlseh::TButtonClickEventEh OnButtonClick = {read=GetOnButtonClick, write=SetOnButtonClick};
	__property Toolctrlseh::TButtonDownEventEh OnButtonDown = {read=GetOnButtonDown, write=SetOnButtonDown};
	void __fastcall SetDropDownBoxListSource(Db::TDataSource* AListSource);
	Dbgrideh::TCustomDBGridEh* __fastcall GetLookupGrid(void);
	Dbgrideh::TDBLookupGridEhOptions __fastcall GetOptions(void);
	void __fastcall SetOptions(Dbgrideh::TDBLookupGridEhOptions Value);
	
public:
	__fastcall virtual TCustomDBLookupComboboxEh(Classes::TComponent* AOwner);
	__fastcall virtual ~TCustomDBLookupComboboxEh(void);
	virtual bool __fastcall LocateKey(void);
	void __fastcall ClearDataProps(void);
	virtual void __fastcall CloseUp(bool Accept);
	virtual void __fastcall DefaultHandler(void *Message);
	virtual void __fastcall DropDown(void);
	HIDESBASE virtual void __fastcall SelectAll(void);
	void __fastcall SelectNextValue(bool IsPrior);
	virtual void __fastcall UpdateData(void);
	__property AnsiString DataField = {read=FDataFieldName, write=SetDataFieldName};
	__property Dblookupgridseh::TPopupDataGridEh* DataList = {read=FDataList};
	__property TLookupComboboxDropDownBoxEh* DropDownBox = {read=FDropDownBox, write=SetDropDownBox};
	__property Db::TField* Field = {read=GetDataField};
	__property AnsiString KeyField = {read=GetKeyFieldName, write=SetKeyFieldName};
	__property Variant KeyValue = {read=FKeyValue, write=SelectKeyValue};
	__property AnsiString ListField = {read=FListFieldName, write=SetListFieldName};
	__property int ListFieldIndex = {read=FListFieldIndex, write=FListFieldIndex, default=0};
	__property Db::TDataSource* ListSource = {read=GetListSource, write=SetListSource};
	__property bool ListVisible = {read=FListVisible, nodefault};
	__property TDBLookupComboboxEhStyle Style = {read=FStyle, write=SetStyle, default=0};
	__property Text ;
	__property Toolctrlseh::TCloseUpEventEh OnCloseUp = {read=FOnCloseUp, write=FOnCloseUp};
	__property Classes::TNotifyEvent OnDropDown = {read=FOnDropDown, write=FOnDropDown};
	__property Classes::TNotifyEvent OnKeyValueChanged = {read=FOnKeyValueChanged, write=FOnKeyValueChanged};
	__property Toolctrlseh::TNotInListEventEh OnNotInList = {read=FOnNotInList, write=FOnNotInList};
	__property Dbgrideh::TCheckTitleEhBtnEvent OnDropDownBoxCheckButton = {read=GetOnDropDownBoxCheckButton, write=SetOnDropDownBoxCheckButton};
	__property Dbgrideh::TDrawColumnEhCellEvent OnDropDownBoxDrawColumnCell = {read=GetOnDropDownBoxDrawColumnCell, write=SetOnDropDownBoxDrawColumnCell};
	__property Dbgrideh::TGetCellEhParamsEvent OnDropDownBoxGetCellParams = {read=GetOnDropDownBoxGetCellParams, write=SetOnDropDownBoxGetCellParams};
	__property Classes::TNotifyEvent OnDropDownBoxSortMarkingChanged = {read=GetOnDropDownBoxSortMarkingChanged, write=SetOnDropDownBoxSortMarkingChanged};
	__property Dbgrideh::TTitleEhClickEvent OnDropDownBoxTitleBtnClick = {read=GetOnDropDownBoxTitleBtnClick, write=SetOnDropDownBoxTitleBtnClick};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TCustomDBLookupComboboxEh(HWND ParentWindow) : Dbctrlseh::TCustomDBEditEh(ParentWindow) { }
	#pragma option pop
	
private:
	void *__ILookupGridOwner;	/* Dbgrideh::ILookupGridOwner */
	
public:
	operator ILookupGridOwner*(void) { return (ILookupGridOwner*)&__ILookupGridOwner; }
	
};


class PASCALIMPLEMENTATION TDataSourceLinkEh : public Dbctrlseh::TFieldDataLinkEh 
{
	typedef Dbctrlseh::TFieldDataLinkEh inherited;
	
private:
	bool FDataIndependentValueAsText;
	TCustomDBLookupComboboxEh* FDBLookupControl;
	
protected:
	__fastcall TDataSourceLinkEh(void);
	virtual void __fastcall RecordChanged(Db::TField* Field);
	virtual void __fastcall LayoutChanged(void);
public:
	#pragma option push -w-inl
	/* TDataLink.Destroy */ inline __fastcall virtual ~TDataSourceLinkEh(void) { }
	#pragma option pop
	
};


class DELPHICLASS TDBLookupComboboxEh;
class PASCALIMPLEMENTATION TDBLookupComboboxEh : public TCustomDBLookupComboboxEh 
{
	typedef TCustomDBLookupComboboxEh inherited;
	
__published:
	__property Alignment ;
	__property AlwaysShowBorder  = {default=0};
	__property AutoSelect  = {default=1};
	__property AutoSize  = {default=1};
	__property BorderStyle  = {default=1};
	__property Anchors  = {default=3};
	__property BiDiMode ;
	__property Constraints ;
	__property DragKind  = {default=0};
	__property Images ;
	__property ParentBiDiMode  = {default=1};
	__property OnEndDock ;
	__property OnStartDock ;
	__property Color  = {default=-16777211};
	__property Ctl3D ;
	__property DataField ;
	__property DataSource ;
	__property DragCursor  = {default=-12};
	__property DragMode  = {default=0};
	__property DropDownBox ;
	__property Enabled  = {default=1};
	__property EditButton ;
	__property EditButtons ;
	__property Font ;
	__property Flat  = {default=0};
	__property HighlightRequired  = {default=0};
	__property ImeMode  = {default=3};
	__property ImeName ;
	__property KeyField ;
	__property ListField ;
	__property ListFieldIndex  = {default=0};
	__property ListSource ;
	__property ParentColor  = {default=0};
	__property ParentCtl3D  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ReadOnly  = {default=0};
	__property ShowHint  = {default=0};
	__property Style  = {default=0};
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
	__property Tooltips  = {default=0};
	__property Visible ;
	__property WordWrap  = {default=0};
	__property OnButtonClick ;
	__property OnButtonDown ;
	__property OnChange ;
	__property OnClick ;
	__property OnCloseUp ;
	__property OnCheckDrawRequiredState ;
	__property OnContextPopup ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnDropDown ;
	__property OnDropDownBoxCheckButton ;
	__property OnDropDownBoxDrawColumnCell ;
	__property OnDropDownBoxGetCellParams ;
	__property OnDropDownBoxSortMarkingChanged ;
	__property OnDropDownBoxTitleBtnClick ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnGetImageIndex ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnKeyValueChanged ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnNotInList ;
	__property OnUpdateData ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TCustomDBLookupComboboxEh.Create */ inline __fastcall virtual TDBLookupComboboxEh(Classes::TComponent* AOwner) : TCustomDBLookupComboboxEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomDBLookupComboboxEh.Destroy */ inline __fastcall virtual ~TDBLookupComboboxEh(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TDBLookupComboboxEh(HWND ParentWindow) : TCustomDBLookupComboboxEh(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Dblookupeh */
using namespace Dblookupeh;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// Dblookupeh