dbgrideh.hpp

最新的 DBGRIDEH4.0

	__property bool EndEllipsis = {read=GetEndEllipsis, write=SetEndEllipsis, stored=IsEndEllipsisStored, nodefault};
	__property AnsiString FieldName = {read=FFieldName, write=SetFieldName};
	__property Graphics::TFont* Font = {read=GetFont, write=SetFont, stored=IsFontStored};
	__property TColumnFooterEh* Footer = {read=FFooter, write=SetFooter};
	__property TColumnFootersEh* Footers = {read=FFooters, write=SetFooters};
	__property bool HideDuplicates = {read=FHideDuplicates, write=SetHideDuplicates, default=0};
	__property bool HighlightRequired = {read=GetHighlightRequired, write=SetHighlightRequired, stored=IsHighlightRequiredStored, nodefault};
	__property Imglist::TCustomImageList* ImageList = {read=FImageList, write=SetImageList};
	__property Controls::TImeMode ImeMode = {read=GetImeMode, write=SetImeMode, stored=IsImeModeStored, nodefault};
	__property AnsiString ImeName = {read=GetImeName, write=SetImeName, stored=IsImeNameStored};
	__property Extended Increment = {read=FIncrement, write=FIncrement, stored=IsIncrementStored};
	__property Classes::TStrings* KeyList = {read=GetKeykList, write=SetKeykList};
	__property AnsiString LookupDisplayFields = {read=GetLookupDisplayFields, write=SetLookupDisplayFields, stored=IsLookupDisplayFieldsStored};
	__property Stdctrls::TTextLayout Layout = {read=GetLayout, write=SetLayout, stored=IsLayoutStored, nodefault};
	__property int MaxWidth = {read=FMaxWidth, write=SetMaxWidth, default=0};
	__property int MinWidth = {read=FMinWidth, write=SetMinWidth, default=0};
	__property Toolctrlseh::TMRUListEh* MRUList = {read=FMRUList, write=SetMRUList};
	__property int NotInKeyListIndex = {read=FNotInKeyListIndex, write=SetNotInKeyListIndex, default=-1};
	__property Classes::TStrings* PickList = {read=GetPickList, write=SetPickList};
	__property Menus::TPopupMenu* PopupMenu = {read=FPopupMenu, write=SetPopupMenu};
	__property bool ReadOnly = {read=GetReadOnly, write=SetReadOnly, stored=IsReadOnlyStored, nodefault};
	__property TSTColumnFilterEh* STFilter = {read=FSTFilter, write=SetSTFilter};
	__property bool ShowImageAndText = {read=GetShowImageAndText, write=SetShowImageAndText, default=0};
	__property int Tag = {read=FTag, write=FTag, default=0};
	__property TColumnTitleEh* Title = {read=FTitle, write=SetTitle};
	__property bool ToolTips = {read=GetToolTips, write=SetToolTips, stored=IsToolTipsStored, nodefault};
	__property bool Visible = {read=FVisible, write=SetVisible, default=1};
	__property int Width = {read=GetWidth, write=SetWidth, stored=IsWidthStored, nodefault};
	__property bool WordWrap = {read=GetWordWrap, write=SetWordWrap, stored=IsWordWrapStored, nodefault};
	__property TOnColumnCheckDrawRequiredStateEventEh OnCheckDrawRequiredState = {read=FOnCheckDrawRequiredState, write=FOnCheckDrawRequiredState};
	__property TCheckTitleEhBtnEvent OnDropDownBoxCheckButton = {read=GetOnDropDownBoxCheckButton, write=SetOnDropDownBoxCheckButton};
	__property TDrawColumnEhCellEvent OnDropDownBoxDrawColumnCell = {read=GetOnDropDownBoxDrawColumnCell, write=SetOnDropDownBoxDrawColumnCell};
	__property TGetCellEhParamsEvent OnDropDownBoxGetCellParams = {read=GetOnDropDownBoxGetCellParams, write=SetOnDropDownBoxGetCellParams};
	__property Classes::TNotifyEvent OnDropDownBoxSortMarkingChanged = {read=GetOnDropDownBoxSortMarkingChanged, write=SetOnDropDownBoxSortMarkingChanged};
	__property TTitleEhClickEvent OnDropDownBoxTitleBtnClick = {read=GetOnDropDownBoxTitleBtnClick, write=SetOnDropDownBoxTitleBtnClick};
	__property Toolctrlseh::TButtonClickEventEh OnEditButtonClick = {read=FOnButtonClick, write=FOnButtonClick};
	__property Toolctrlseh::TButtonDownEventEh OnEditButtonDown = {read=FOnButtonDown, write=FOnButtonDown};
	__property TGetColCellParamsEventEh OnGetCellParams = {read=FOnGetCellParams, write=SetOnGetCellParams};
	__property Toolctrlseh::TNotInListEventEh OnNotInList = {read=FOnNotInList, write=FOnNotInList};
	__property TColCellUpdateDataEventEh OnUpdateData = {read=FUpdateData, write=FUpdateData};
private:
	void *__ILookupGridOwner;	/* Dbgrideh::ILookupGridOwner */
	void *__IInterface;	/* System::IInterface */
	
public:
	operator IInterface*(void) { return (IInterface*)&__IInterface; }
	operator ILookupGridOwner*(void) { return (ILookupGridOwner*)&__ILookupGridOwner; }
	
};


typedef TMetaClass* TColumnEhClass;

class DELPHICLASS TDBGridColumnEh;
class PASCALIMPLEMENTATION TDBGridColumnEh : public TColumnEh 
{
	typedef TColumnEh inherited;
	
__published:
	__property Alignment ;
	__property AlwaysShowEditButton ;
	__property AutoDropDown ;
	__property AutoFitColWidth  = {default=1};
	__property BiDiMode ;
	__property ButtonStyle  = {default=0};
	__property Checkboxes ;
	__property Color ;
	__property DblClickNextVal ;
	__property DisplayFormat ;
	__property DropDownBox ;
	__property DropDownRows  = {default=7};
	__property DropDownShowTitles ;
	__property DropDownSizing ;
	__property DropDownSpecRow ;
	__property DropDownWidth  = {default=0};
	__property EditButtons ;
	__property EditMask ;
	__property EndEllipsis ;
	__property FieldName ;
	__property Font ;
	__property Footer ;
	__property Footers ;
	__property HideDuplicates  = {default=0};
	__property HighlightRequired ;
	__property ImageList ;
	__property ImeMode ;
	__property ImeName ;
	__property Increment ;
	__property KeyList ;
	__property Layout ;
	__property LookupDisplayFields ;
	__property MaxWidth  = {default=0};
	__property MinWidth  = {default=0};
	__property MRUList ;
	__property NotInKeyListIndex  = {default=-1};
	__property PickList ;
	__property PopupMenu ;
	__property ReadOnly ;
	__property ShowImageAndText  = {default=0};
	__property STFilter ;
	__property Tag  = {default=0};
	__property Title ;
	__property ToolTips ;
	__property Visible  = {default=1};
	__property Width ;
	__property WordWrap ;
	__property OnCheckDrawRequiredState ;
	__property OnDropDownBoxCheckButton ;
	__property OnDropDownBoxDrawColumnCell ;
	__property OnDropDownBoxGetCellParams ;
	__property OnDropDownBoxSortMarkingChanged ;
	__property OnDropDownBoxTitleBtnClick ;
	__property OnEditButtonClick ;
	__property OnEditButtonDown ;
	__property OnGetCellParams ;
	__property OnNotInList ;
	__property OnUpdateData ;
public:
	#pragma option push -w-inl
	/* TColumnEh.Create */ inline __fastcall virtual TDBGridColumnEh(Classes::TCollection* Collection) : TColumnEh(Collection) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TColumnEh.Destroy */ inline __fastcall virtual ~TDBGridColumnEh(void) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TDBGridColumnsEh : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
public:
	TColumnEh* operator[](int Index) { return Items[Index]; }
	
private:
	TCustomDBGridEh* FGrid;
	TColumnEh* __fastcall GetColumn(int Index);
	TDBGridColumnsState __fastcall GetState(void);
	TColumnEh* __fastcall InternalAdd(void);
	void __fastcall SetColumn(int Index, TColumnEh* Value);
	void __fastcall SetState(TDBGridColumnsState NewState);
	
protected:
	int __fastcall GetUpdateCount(void);
	DYNAMIC Classes::TPersistent* __fastcall GetOwner(void);
	virtual void __fastcall Update(Classes::TCollectionItem* Item);
	__property int UpdateCount = {read=GetUpdateCount, nodefault};
	
public:
	__fastcall TDBGridColumnsEh(TCustomDBGridEh* Grid, TMetaClass* ColumnClass);
	HIDESBASE TColumnEh* __fastcall Add(void);
	bool __fastcall ExistFooterValueType(TFooterValueType AFooterValueType);
	void __fastcall AddAllColumns(bool DeleteExisting);
	void __fastcall ActiveChanged(void);
	void __fastcall LoadFromFile(const AnsiString Filename);
	void __fastcall LoadFromStream(Classes::TStream* S);
	void __fastcall RebuildColumns(void);
	void __fastcall RestoreDefaults(void);
	void __fastcall SaveToFile(const AnsiString Filename);
	void __fastcall SaveToStream(Classes::TStream* S);
	__property TCustomDBGridEh* Grid = {read=FGrid};
	__property TColumnEh* Items[int Index] = {read=GetColumn, write=SetColumn/*, default*/};
	__property TDBGridColumnsState State = {read=GetState, write=SetState, nodefault};
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TDBGridColumnsEh(void) { }
	#pragma option pop
	
};


class DELPHICLASS TColumnsEhList;
class PASCALIMPLEMENTATION TColumnsEhList : public Contnrs::TObjectList 
{
	typedef Contnrs::TObjectList inherited;
	
public:
	TColumnEh* operator[](int Index) { return Items[Index]; }
	
private:
	TColumnEh* __fastcall GetColumn(int Index);
	void __fastcall SetColumn(int Index, const TColumnEh* Value);
	
public:
	__fastcall TColumnsEhList(void)/* overload */;
	__property TColumnEh* Items[int Index] = {read=GetColumn, write=SetColumn/*, default*/};
public:
	#pragma option push -w-inl
	/* TList.Destroy */ inline __fastcall virtual ~TColumnsEhList(void) { }
	#pragma option pop
	
};


typedef DynamicArray<int >  DBGridEh__61;

class DELPHICLASS TGridDataLinkEh;
class PASCALIMPLEMENTATION TGridDataLinkEh : public Db::TDataLink 
{
	typedef Db::TDataLink inherited;
	
private:
	int FFieldCount;
	DynamicArray<int >  FFieldMap;
	int FFieldMapSize;
	TCustomDBGridEh* FGrid;
	bool FInUpdateData;
	bool FModified;
	bool FSparseMap;
	bool __fastcall GetDefaultFields(void);
	Db::TField* __fastcall GetFields(int I);
	
protected:
	int __fastcall GetMappedIndex(int ColIndex);
	virtual int __fastcall MoveBy(int Distance);
	virtual void __fastcall ActiveChanged(void);
	virtual void __fastcall DataEvent(Db::TDataEvent Event, int Info);
	virtual void __fastcall DataSetChanged(void);
	virtual void __fastcall DataSetScrolled(int Distance);
	virtual void __fastcall EditingChanged(void);
	virtual void __fastcall FocusControl(Db::TFieldRef Field);
	virtual void __fastcall LayoutChanged(void);
	virtual void __fastcall RecordChanged(Db::TField* Field);
	virtual void __fastcall UpdateData(void);
	
public:
	__fastcall TGridDataLinkEh(TCustomDBGridEh* AGrid);
	__fastcall virtual ~TGridDataLinkEh(void);
	bool __fastcall AddMapping(const AnsiString FieldName);
	void __fastcall ClearMapping(void);
	void __fastcall Modified(void);
	void __fastcall Reset(void);
	__property bool DefaultFields = {read=GetDefaultFields, nodefault};
	__property int FieldCount = {read=FFieldCount, nodefault};
	__property Db::TField* Fields[int I] = {read=GetFields};
	__property bool SparseMap = {read=FSparseMap, write=FSparseMap, nodefault};
};


class DELPHICLASS TBookmarkListEh;
class PASCALIMPLEMENTATION TBookmarkListEh : public Toolctrlseh::TBMListEh 
{
	typedef Toolctrlseh::TBMListEh inherited;
	
private:
	TCustomDBGridEh* FGrid;
	
protected:
	virtual Db::TDataSet* __fastcall GetDataSet(void);
	virtual void __fastcall Invalidate(void);
	virtual void __fastcall SetCurrentRowSelected(bool Value);
	virtual void __fastcall UpdateState(void);
	
public:
	__fastcall TBookmarkListEh(TCustomDBGridEh* AGrid);
	Types::TRect __fastcall SelectionToGridRect();
	virtual void __fastcall Clear(void);
public:
	#pragma option push -w-inl
	/* TBMListEh.Destroy */ inline __fastcall virtual ~TBookmarkListEh(void) { }
	#pragma option pop
	
};


class DELPHICLASS THeadTreeNode;
typedef void __fastcall (__closure *THeadTreeProc)(THeadTreeNode* node);

class PASCALIMPLEMENTATION THeadTreeNode : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	THeadTreeNode* Child;
	TColumnEh* Column;
	bool Drawed;
	int Height;
	int HeightPrn;
	THeadTreeNode* Host;
	THeadTreeNode* Next;
	AnsiString Text;
	int VLineWidth;
	int Width;
	int WidthPrn;
	int WIndent;
	__fastcall THeadTreeNode(void);
	__fastcall THeadTreeNode(AnsiString AText, int AHeight, int AWidth);
	__fastcall virtual ~THeadTreeNode(void);
	THeadTreeNode* __fastcall Add(THeadTreeNode* AAfter, AnsiString AText, int AHeight, int AWidth);
	THeadTreeNode* __fastcall AddChild(THeadTreeNode* ANode, AnsiString AText, int AHeight, int AWidth);
	bool __fastcall Find(THeadTreeNode* ANode);
	int __fastcall GetLevel(void);
	void __fastcall CreateFieldTree(TCustomDBGridEh* AGrid);
	void __fastcall DoForAllNode(THeadTreeProc proc);
	void __fastcall FreeAllChild(void);
	void __fastcall Union(THeadTreeNode* AFrom, THeadTreeNode* ATo, AnsiString AText, int AHeight);
};


struct LeafCol
{
	
public:
	THeadTreeNode* FLeaf;
	TColumnEh* FColumn;
} ;

typedef LeafCol *PLeafCol;

typedef LeafCol TLeafCol[134217727];