memtabledataeh.hpp

最新的 DBGRIDEH4.0

	int __fastcall GetIndex(void);
	
protected:
	virtual int __fastcall DefaultSize(void);
	virtual Classes::TAlignment __fastcall DefaultAlignment(void);
	virtual AnsiString __fastcall DefValueForDefaultExpression();
	virtual AnsiString __fastcall DefaultDisplayLabel();
	virtual int __fastcall DefaultDisplayWidth(void);
	virtual AnsiString __fastcall DefaultEditMask();
	virtual bool __fastcall DefaultRequired(void);
	virtual bool __fastcall DefaultVisible(void);
	virtual Classes::TAlignment __fastcall GetAlignment(void);
	virtual bool __fastcall GetAutoIncrement(void);
	virtual Db::TFieldType __fastcall GetDataType(void);
	virtual AnsiString __fastcall GetDefaultExpression();
	virtual AnsiString __fastcall GetDisplayLabel();
	virtual int __fastcall GetDisplayWidth(void);
	virtual AnsiString __fastcall GetEditMask();
	virtual AnsiString __fastcall GetFieldName();
	virtual bool __fastcall GetReadOnly(void);
	virtual bool __fastcall GetRequired(void);
	virtual int __fastcall GetSize(void);
	virtual bool __fastcall GetVisible(void);
	AnsiString __fastcall CreateUniqueName(const AnsiString FieldName);
	virtual void __fastcall SetAlignment(const Classes::TAlignment Value);
	virtual void __fastcall SetAutoIncrement(const bool Value);
	virtual void __fastcall SetDefaultExpression(const AnsiString Value);
	virtual void __fastcall SetDisplayLabel(const AnsiString Value);
	virtual void __fastcall SetDisplayWidth(const int Value);
	virtual void __fastcall SetEditMask(const AnsiString Value);
	virtual void __fastcall SetFieldName(const AnsiString Value);
	virtual void __fastcall SetReadOnly(const bool Value);
	virtual void __fastcall SetRequired(const bool Value);
	virtual void __fastcall SetSize(const int Value);
	virtual void __fastcall SetVisible(const bool Value);
	void __fastcall CheckInactive(void);
	DYNAMIC void __fastcall SetParentComponent(Classes::TComponent* AParent);
	virtual void __fastcall ReadState(Classes::TReader* Reader);
	
public:
	__fastcall virtual TMTDataFieldEh(Classes::TComponent* AOwner);
	__fastcall virtual ~TMTDataFieldEh(void);
	DYNAMIC Classes::TComponent* __fastcall GetParentComponent(void);
	DYNAMIC bool __fastcall HasParent(void);
	virtual bool __fastcall CanDinaSize(void);
	virtual Word __fastcall GetVarDataType(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	virtual void __fastcall AssignProps(Db::TField* Field);
	__property TMTDataStructEh* DataStruct = {read=FDataStruct, write=SetDataStruct};
	__property Db::TFieldType DataType = {read=GetDataType, nodefault};
	__property int Size = {read=GetSize, write=SetSize, nodefault};
	__property bool AutoIncrement = {read=GetAutoIncrement, write=SetAutoIncrement, nodefault};
	__property Classes::TAlignment Alignment = {read=GetAlignment, write=SetAlignment, nodefault};
	__property AnsiString DefaultExpression = {read=GetDefaultExpression, write=SetDefaultExpression};
	__property AnsiString DisplayLabel = {read=GetDisplayLabel, write=SetDisplayLabel};
	__property int DisplayWidth = {read=GetDisplayWidth, write=SetDisplayWidth, nodefault};
	__property AnsiString EditMask = {read=GetEditMask, write=SetEditMask};
	__property bool Required = {read=GetRequired, write=SetRequired, nodefault};
	__property bool Visible = {read=GetVisible, write=SetVisible, nodefault};
	__property int Index = {read=GetIndex, nodefault};
	
__published:
	__property AnsiString FieldName = {read=GetFieldName, write=SetFieldName};
};


#pragma option push -b-
enum TStringDataFieldTypesEh { fdtStringEh, fdtFixedCharEh, fdtWideStringEh, fdtGuidEh, fdtFixedWideCharEh, fdtOraIntervalEh };
#pragma option pop

class DELPHICLASS TMTStringDataFieldEh;
class PASCALIMPLEMENTATION TMTStringDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	bool FFixedChar;
	bool FTransliterate;
	TStringDataFieldTypesEh FStringDataType;
	
protected:
	virtual int __fastcall DefaultSize(void);
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual bool __fastcall CanDinaSize(void);
	virtual void __fastcall AssignProps(Db::TField* Field);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property TStringDataFieldTypesEh StringDataType = {read=FStringDataType, write=FStringDataType, nodefault};
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property EditMask ;
	__property Required ;
	__property Visible ;
	__property bool FixedChar = {read=FFixedChar, write=FFixedChar, default=0};
	__property Size ;
	__property bool Transliterate = {read=FTransliterate, write=FTransliterate, default=1};
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTStringDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTStringDataFieldEh(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TNumericDataFieldTypesEh { fdtSmallintEh, fdtIntegerEh, fdtWordEh, fdtFloatEh, fdtCurrencyEh, fdtBCDEh, fdtAutoIncEh, fdtLargeintEh, fdtFMTBcdEh };
#pragma option pop

class DELPHICLASS TMTNumericDataFieldEh;
class PASCALIMPLEMENTATION TMTNumericDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	AnsiString FDisplayFormat;
	AnsiString FEditFormat;
	bool FCurrency;
	double FMaxValue;
	double FMinValue;
	int FPrecision;
	TNumericDataFieldTypesEh FNumericDataType;
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual void __fastcall AssignProps(Db::TField* Field);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property TNumericDataFieldTypesEh NumericDataType = {read=FNumericDataType, write=FNumericDataType, nodefault};
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property EditMask ;
	__property Required ;
	__property Visible ;
	__property AnsiString DisplayFormat = {read=FDisplayFormat, write=FDisplayFormat};
	__property AnsiString EditFormat = {read=FEditFormat, write=FEditFormat};
	__property bool currency = {read=FCurrency, write=FCurrency, nodefault};
	__property double MaxValue = {read=FMaxValue, write=FMaxValue};
	__property double MinValue = {read=FMinValue, write=FMinValue};
	__property int Precision = {read=FPrecision, write=FPrecision, nodefault};
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTNumericDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTNumericDataFieldEh(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TDateTimeDataFieldTypesEh { fdtDateEh, fdtTimeEh, fdtDateTimeEh };
#pragma option pop

class DELPHICLASS TMTDateTimeDataFieldEh;
class PASCALIMPLEMENTATION TMTDateTimeDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	AnsiString FDisplayFormat;
	TDateTimeDataFieldTypesEh FDateTimeDataType;
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual void __fastcall AssignProps(Db::TField* Field);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property TDateTimeDataFieldTypesEh DateTimeDataType = {read=FDateTimeDataType, write=FDateTimeDataType, nodefault};
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property EditMask ;
	__property Required ;
	__property Visible ;
	__property AnsiString DisplayFormat = {read=FDisplayFormat, write=FDisplayFormat};
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTDateTimeDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTDateTimeDataFieldEh(void) { }
	#pragma option pop
	
};


class DELPHICLASS TMTBlobDataFieldEh;
class PASCALIMPLEMENTATION TMTBlobDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	bool FGraphicHeader;
	bool FTransliterate;
	Db::TFieldType FBlobType;
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual void __fastcall AssignProps(Db::TField* Field);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property EditMask ;
	__property Required ;
	__property Visible ;
	__property Db::TBlobType BlobType = {read=FBlobType, write=FBlobType, nodefault};
	__property bool GraphicHeader = {read=FGraphicHeader, write=FGraphicHeader, nodefault};
	__property bool Transliterate = {read=FTransliterate, write=FTransliterate, nodefault};
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTBlobDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTBlobDataFieldEh(void) { }
	#pragma option pop
	
};


class DELPHICLASS TMTBooleanDataFieldEh;
class PASCALIMPLEMENTATION TMTBooleanDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	AnsiString FDisplayValues;
	void __fastcall SetDisplayValues(const AnsiString Value);
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual void __fastcall AssignProps(Db::TField* Field);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	
__published:
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property EditMask ;
	__property Required ;
	__property Visible ;
	__property AnsiString DisplayValues = {read=FDisplayValues, write=SetDisplayValues};
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTBooleanDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTBooleanDataFieldEh(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TInterfaceDataFieldTypesEh { fdtInterfaceEh, fdtIDispatchEh };
#pragma option pop

class DELPHICLASS TMTInterfaceDataFieldEh;
class PASCALIMPLEMENTATION TMTInterfaceDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	TInterfaceDataFieldTypesEh FInterfaceDataType;
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	
__published:
	__property Alignment ;
	__property DefaultExpression ;
	__property DisplayLabel ;
	__property DisplayWidth ;
	__property TInterfaceDataFieldTypesEh InterfaceDataType = {read=FInterfaceDataType, write=FInterfaceDataType, nodefault};
	__property Required ;
	__property Visible ;
public:
	#pragma option push -w-inl
	/* TMTDataFieldEh.Create */ inline __fastcall virtual TMTInterfaceDataFieldEh(Classes::TComponent* AOwner) : TMTDataFieldEh(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TMTDataFieldEh.Destroy */ inline __fastcall virtual ~TMTInterfaceDataFieldEh(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TVariantDataFieldTypesEh { fdtVariant, fdtBytes, fdtVarBytes };
#pragma option pop

class DELPHICLASS TMTVariantDataFieldEh;
class PASCALIMPLEMENTATION TMTVariantDataFieldEh : public TMTDataFieldEh 
{
	typedef TMTDataFieldEh inherited;
	
private:
	TVariantDataFieldTypesEh FVariantDataType;
	
protected:
	virtual Db::TFieldType __fastcall GetDataType(void);
	
public:
	virtual bool __fastcall CanDinaSize(void);
	virtual void __fastcall AssignDataType(Db::TFieldType FieldType);
	
__published:
	__property Alignment ;
	__property DefaultExpression ;