memtableeh.hpp

最新的 DBGRIDEH4.0

	virtual Db::TBookmarkFlag __fastcall GetBookmarkFlag(char * Buffer);
	virtual Db::TGetResult __fastcall GetRecord(char * Buffer, Db::TGetMode GetMode, bool DoCheck);
	virtual void __fastcall ClearCalcFields(char * Buffer);
	void __fastcall CopyBuffer(char * FromBuf, char * ToBuf);
	virtual Variant __fastcall GetAggregateValue(Db::TField* Field);
	virtual Db::TDataSource* __fastcall GetDataSource(void);
	virtual AnsiString __fastcall GetBookmarkStr();
	virtual bool __fastcall GetCanModify(void);
	virtual TMetaClass* __fastcall GetFieldClass(Db::TFieldType FieldType);
	virtual int __fastcall GetRecNo(void);
	virtual int __fastcall GetRecordCount(void);
	virtual Word __fastcall GetRecordSize(void);
	Memtabledataeh::TMemoryRecordEh* __fastcall GetRec(void);
	int __fastcall IndexOfBookmark(void * Bookmark);
	virtual bool __fastcall IsCursorOpen(void);
	virtual int __fastcall InternalApplyUpdates(Memtabledataeh::TMemTableDataEh* AMemTableData, int MaxErrors);
	System::TObject* __fastcall ParseOrderByStr(AnsiString OrderByStr);
	bool __fastcall SetToRec(System::TObject* Rec);
	HIDESBASE void __fastcall BindFields(bool Binding);
	void __fastcall BindCalFields(void);
	virtual void __fastcall CloseBlob(Db::TField* Field);
	virtual void __fastcall CreateFields(void);
	virtual void __fastcall CreateIndexesFromDefs(void);
	virtual void __fastcall DataEvent(Db::TDataEvent Event, int Info);
	virtual void __fastcall DefChanged(System::TObject* Sender);
	void __fastcall FetchRecord(Db::TDataSet* DataSet);
	virtual void __fastcall FreeRecordBuffer(char * &Buffer);
	virtual void __fastcall GetBookmarkData(char * Buffer, void * Data);
	virtual void __fastcall InitRecord(char * Buffer);
	virtual void __fastcall InternalAddRecord(void * Buffer, bool Append);
	virtual void __fastcall InternalGotoBookmark(void * Bookmark);
	virtual void __fastcall InternalInitRecord(char * Buffer);
	virtual void __fastcall InternalSetToRecord(char * Buffer);
	void __fastcall RecordToBuffer(Memtabledataeh::TMemoryRecordEh* MemRec, Memtabledataeh::TDataValueVersionEh DataValueVersion, char * Buffer, int RecIndex);
	virtual void __fastcall SetBookmarkData(char * Buffer, void * Data);
	virtual void __fastcall SetBookmarkFlag(char * Buffer, Db::TBookmarkFlag Value);
	virtual void __fastcall SetFieldData(Db::TField* Field, void * Buffer)/* overload */;
	virtual void __fastcall SetFieldData(Db::TField* Field, void * Buffer, bool NativeFormat)/* overload */;
	virtual void __fastcall SetMemoryRecordData(char * Buffer, Memtabledataeh::TMemoryRecordEh* Rec);
	void __fastcall VarValueToFieldValue(const Variant &VarValue, void * FieldBuffer, Db::TField* Field);
	virtual void __fastcall DoOnNewRecord(void);
	virtual void __fastcall DoOrderBy(const AnsiString OrderByStr);
	virtual void __fastcall ReadState(Classes::TReader* Reader);
	void __fastcall SetExtraStructParams(void);
	DYNAMIC void __fastcall GetChildren(Classes::TGetChildProc Proc, Classes::TComponent* Root);
	HIDESBASE void __fastcall InitFieldDefsFromFields(void);
	virtual void __fastcall InternalCancel(void);
	virtual void __fastcall InternalClose(void);
	virtual void __fastcall InternalDelete(void);
	virtual void __fastcall InternalFirst(void);
	virtual void __fastcall InternalHandleException(void);
	virtual void __fastcall InternalInitFieldDefs(void);
	virtual void __fastcall InternalInsert(void);
	virtual void __fastcall InternalLast(void);
	virtual void __fastcall InternalOpen(void);
	virtual void __fastcall InternalPost(void);
	virtual void __fastcall InternalRefresh(void);
	void __fastcall MasterChange(System::TObject* Sender);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	virtual void __fastcall OpenCursor(bool InfoQuery);
	virtual void __fastcall ResetAggField(Db::TField* Field);
	void __fastcall SetBlobData(Db::TField* Field, TRecBuf* Buffer, const Variant &Value);
	virtual void __fastcall SetFiltered(bool Value);
	virtual void __fastcall SetOnFilterRecord(const Db::TFilterRecordEvent Value);
	virtual void __fastcall SetRecNo(int Value);
	void __fastcall UpdateDetailMode(bool AutoRefresh);
	virtual void __fastcall UpdateIndexDefs(void);
	virtual void __fastcall UpdateSortOrder(void);
	Contnrs::TObjectList* __fastcall GetPrefilteredList(void);
	void __fastcall ViewDataEvent(Memtabledataeh::TMemoryRecordEh* MemRec, int Index, Memtabledataeh::TRecordsListNotification Action);
	void __fastcall MTApplyUpdates(Memtabledataeh::TMemTableDataEh* AMemTableData);
	bool __fastcall TreeViewNodeExpanding(Memtreeeh::TBaseTreeNodeEh* Sender);
	void __fastcall TreeViewNodeExpanded(Memtreeeh::TBaseTreeNodeEh* Sender);
	__property bool AggregatesActive = {read=GetAggregatesActive, write=SetAggregatesActive, default=0};
	__property int DataFieldsCount = {read=GetDataFieldsCount, nodefault};
	__property char * InstantBuffer = {read=GetInstantBuffer};
	
public:
	__fastcall virtual TCustomMemTableEh(Classes::TComponent* AOwner);
	__fastcall virtual ~TCustomMemTableEh(void);
	virtual int __fastcall ApplyUpdates(int MaxErrors);
	virtual bool __fastcall BookmarkValid(void * Bookmark);
	int __fastcall BookmarkToRecNo(void * Bookmark);
	int __fastcall BookmarkStrToRecNo(AnsiString Bookmark);
	AnsiString __fastcall RecNoToBookmarkStr(int RecNo);
	virtual int __fastcall CompareBookmarks(void * Bookmark1, void * Bookmark2);
	virtual bool __fastcall GetCurrentRecord(char * Buffer);
	virtual bool __fastcall GetFieldData(Db::TField* Field, void * Buffer)/* overload */;
	virtual bool __fastcall GetFieldData(Db::TField* Field, void * Buffer, bool NativeFormat)/* overload */;
	virtual bool __fastcall GetFieldData(int FieldNo, void * Buffer)/* overload */;
	virtual bool __fastcall GetFieldDataAsObject(Db::TField* Field, System::TObject* &Value);
	bool __fastcall GotoRec(Memtabledataeh::TMemoryRecordEh* Rec);
	virtual Classes::TStream* __fastcall CreateBlobStream(Db::TField* Field, Db::TBlobStreamMode Mode);
	int __fastcall FetchRecords(int Count);
	int __fastcall FindRec(const AnsiString KeyFields, const Variant &KeyValues, Db::TLocateOptions Options);
	int __fastcall InstantReadIndexOfBookmark(AnsiString Bookmark);
	int __fastcall InstantReadRowCount(void);
	virtual bool __fastcall IsSequenced(void);
	int __fastcall LoadFromDataSet(Db::TDataSet* Source, int RecordCount, TLoadMode Mode, bool UseCachedUpdates);
	virtual bool __fastcall Locate(const AnsiString KeyFields, const Variant &KeyValues, Db::TLocateOptions Options);
	virtual Variant __fastcall Lookup(const AnsiString KeyFields, const Variant &KeyValues, const AnsiString ResultFields);
	int __fastcall SaveToDataSet(Db::TDataSet* Dest, int RecordCount);
	virtual Db::TUpdateStatus __fastcall UpdateStatus(void);
	TRecBuf* __fastcall SetTempRecBufForRecord(Memtabledataeh::TMemoryRecordEh* Rec, Memtabledataeh::TMemRecViewEh* TreeNode, int RecNum);
	bool __fastcall MoveRecord(int FromIndex, int ToIndex, int TreeLevel, bool CheckOnly);
	bool __fastcall MoveRecords(Classes::TStrings* BookmarkList, int ToRecNo, int TreeLevel, bool CheckOnly);
	void __fastcall CancelUpdates(void);
	void __fastcall CopyStructure(Db::TDataSet* Source);
	void __fastcall CreateDataSet(void);
	void __fastcall DriverStructChanged(void);
	void __fastcall DestroyTable(void);
	void __fastcall EmptyTable(void);
	void __fastcall FetchParams(void);
	void __fastcall InstantReadEnter(int RowNum)/* overload */;
	void __fastcall InstantReadEnter(Memtabledataeh::TMemRecViewEh* RecView, int RowNum)/* overload */;
	void __fastcall InstantReadEnter(Memtabledataeh::TMemoryRecordEh* MemRec, int RowNum)/* overload */;
	void __fastcall InstantReadLeave(void);
	void __fastcall MergeChangeLog(void);
	void __fastcall RefreshRecord(void);
	virtual void __fastcall Resync(Db::TResyncMode Mode);
	void __fastcall RevertRecord(void);
	virtual void __fastcall SetFieldDataAsObject(Db::TField* Field, System::TObject* Value);
	virtual void __fastcall SetFilterText(const AnsiString Value);
	void __fastcall SortByFields(const AnsiString SortByStr);
	__property Memtabledataeh::TAutoIncrementEh* AutoIncrement = {read=GetAutoIncrement, write=SetAutoIncrement};
	__property bool CachedUpdates = {read=GetCachedUpdates, write=SetCachedUpdates, default=0};
	__property Datadrivereh::TDataDriverEh* DataDriver = {read=FDataDriver, write=SetDataDriver};
	__property AnsiString DetailFields = {read=FDetailFields, write=SetDetailFields};
	__property TCustomMemTableEh* ExternalMemData = {read=FExternalMemData, write=SetExternalMemData};
	__property bool FetchAllOnOpen = {read=FFetchAllOnOpen, write=FFetchAllOnOpen, default=0};
	__property FieldDefs  = {stored=FStoreDefs};
	__property Db::TIndexDefs* IndexDefs = {read=GetIndexDefs, write=SetIndexDefs, stored=FStoreDefs};
	__property int InstantReadCurRow = {read=GetInstantReadCurRowNum, nodefault};
	__property TMasterDetailSideEh MasterDetailSide = {read=FMasterDetailSide, write=SetMasterDetailSide, default=0};
	__property AnsiString MasterFields = {read=GetMasterFields, write=SetMasterFields};
	__property Db::TDataSource* MasterSource = {read=GetMasterSource, write=SetMasterSource};
	__property Db::TParams* Params = {read=FParams, write=SetParams};
	__property bool ReadOnly = {read=FReadOnly, write=SetReadOnly, default=0};
	__property Memtabledataeh::TMemoryRecordEh* Rec = {read=GetRec};
	__property Memtabledataeh::TRecordsViewEh* RecordsView = {read=FRecordsView};
	__property AnsiString SortOrder = {read=GetSortOrder, write=SetSortOrder};
	__property Db::TUpdateStatusSet StatusFilter = {read=GetStatusFilter, write=SetStatusFilter, default=7};
	__property bool StoreDefs = {read=FStoreDefs, write=FStoreDefs, default=0};
	__property TMemTableTreeListEh* TreeList = {read=FTreeList, write=FTreeList};
	__property Memtabledataeh::TMemRecViewEh* TreeNode = {read=GetTreeNode};
	__property int TreeNodeChildCount = {read=GetTreeNodeChildCount, nodefault};
	__property bool TreeNodeExpanded = {read=GetTreeNodeExpanded, write=SetTreeNodeExpanded, nodefault};
	__property bool TreeNodeHasChildren = {read=GetTreeNodeHasChildren, write=SetTreeNodeHasChildren, nodefault};
	__property int TreeNodeLevel = {read=GetTreeNodeLevel, nodefault};
	__property Memtabledataeh::TUpdateErrorEh* UpdateError = {read=GetUpdateError};
	__property TMTTreeNodeExpandingEventEh OnTreeNodeExpanding = {read=FOnTreeNodeExpanding, write=FOnTreeNodeExpanding};
	__property TRecordsViewTreeNodeExpandingEventEh OnRecordsViewTreeNodeExpanding = {read=FOnRecordsViewTreeNodeExpanding, write=FOnRecordsViewTreeNodeExpanding};
	__property TRecordsViewTreeNodeExpandedEventEh OnRecordsViewTreeNodeExpanded = {read=FOnRecordsViewTreeNodeExpanded, write=FOnRecordsViewTreeNodeExpanded};
	__property TRecordsViewCheckMoveNodeEventEh OnRecordsViewCheckMoveNode = {read=FOnRecordsViewCheckMoveNode, write=FOnRecordsViewCheckMoveNode};
	__property TMemTableChangeFieldValueEventEh OnGetFieldValue = {read=FOnGetFieldValue, write=FOnGetFieldValue};
	__property TMemTableChangeFieldValueEventEh OnSetFieldValue = {read=FOnSetFieldValue, write=FOnSetFieldValue};
private:
	void *__IMemTableEh;	/* Toolctrlseh::IMemTableEh */
	void *__IInterface;	/* System::IInterface */
	
public:
	operator IInterface*(void) { return (IInterface*)&__IInterface; }
	operator IMemTableEh*(void) { return (IMemTableEh*)&__IMemTableEh; }
	
};


class PASCALIMPLEMENTATION TMemTableTreeListEh : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	TCustomMemTableEh* FMemTable;
	bool __fastcall GetActive(void);
	bool __fastcall GetDefaultNodeExpanded(void);
	bool __fastcall GetDefaultNodeHasChildren(void);
	bool __fastcall GetFilterNodeIfParentVisible(void);
	bool __fastcall GetFullBuildCheck(void);
	AnsiString __fastcall GetKeyFieldName();
	AnsiString __fastcall GetRefParentFieldName();
	void __fastcall SetActive(const bool Value);
	void __fastcall SetDefaultNodeExpanded(const bool Value);
	void __fastcall SetDefaultNodeHasChildren(const bool Value);
	void __fastcall SetFilterNodeIfParentVisible(const bool Value);
	void __fastcall SetFullBuildCheck(const bool Value);
	void __fastcall SetKeyFieldName(const AnsiString Value);
	void __fastcall SetRefParentFieldName(const AnsiString Value);
	
public:
	__fastcall TMemTableTreeListEh(TCustomMemTableEh* AMemTable);
	virtual bool __fastcall Locate(const AnsiString KeyFields, const Variant &KeyValues, Db::TLocateOptions Options);
	virtual void __fastcall FullCollapse(void);
	virtual void __fastcall FullExpand(void);
	
__published:
	__property bool Active = {read=GetActive, write=SetActive, default=0};
	__property AnsiString KeyFieldName = {read=GetKeyFieldName, write=SetKeyFieldName};
	__property AnsiString RefParentFieldName = {read=GetRefParentFieldName, write=SetRefParentFieldName};
	__property bool DefaultNodeExpanded = {read=GetDefaultNodeExpanded, write=SetDefaultNodeExpanded, default=0};
	__property bool DefaultNodeHasChildren = {read=GetDefaultNodeHasChildren, write=SetDefaultNodeHasChildren, default=0};
	__property bool FullBuildCheck = {read=GetFullBuildCheck, write=SetFullBuildCheck, default=1};
	__property bool FilterNodeIfParentVisible = {read=GetFilterNodeIfParentVisible, write=SetFilterNodeIfParentVisible, default=1};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TMemTableTreeListEh(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TMTUpdateActionEh { uaFailEh, uaAbortEh, uaSkipEh, uaRetryEh, uaApplyEh, uaAppliedEh };
#pragma option pop

typedef void __fastcall (__closure *TMTUpdateRecordEventEh)(Db::TDataSet* DeltaDataSet, Db::TUpdateKind UpdateKind, TMTUpdateActionEh &UpdateAction);

typedef void __fastcall (__closure *TMTFetchRecordEventEh)(Db::TDataSet* PacketDataSet, bool &ProviderEOF, bool &Applied);

typedef void __fastcall (__closure *TMTRefreshRecordEventEh)(Db::TDataSet* PacketDataSet, bool &Applied);

typedef DynamicArray<Variant >  TFBRecBufValues;

class PASCALIMPLEMENTATION TRecBuf : public System::TObject 
{
	typedef System::TObject inherited;