david
5678df5538
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@31 05c56307-c608-d34a-929d-697000501d7a
46 lines
1.6 KiB
C++
46 lines
1.6 KiB
C++
//---------------------------------------------------------------------------
|
|
|
|
#ifndef EBarMegaDemoDataH
|
|
#define EBarMegaDemoDataH
|
|
//---------------------------------------------------------------------------
|
|
#include <Classes.hpp>
|
|
#include <Controls.hpp>
|
|
#include <StdCtrls.hpp>
|
|
#include <Forms.hpp>
|
|
#include <DB.hpp>
|
|
#include <DBTables.hpp>
|
|
//---------------------------------------------------------------------------
|
|
class TEBarMegaDemoMainDM : public TDataModule
|
|
{
|
|
__published: // IDE-managed Components
|
|
TTable *tblContacts;
|
|
TAutoIncField *tblContactsID;
|
|
TIntegerField *tblContactsProductID;
|
|
TStringField *tblContactsFirstName;
|
|
TStringField *tblContactsLastName;
|
|
TStringField *tblContactsCompany;
|
|
TStringField *tblContactsAddress;
|
|
TStringField *tblContactsCity;
|
|
TStringField *tblContactsState;
|
|
TDateField *tblContactsPurchaseDate;
|
|
TStringField *tblContactsPaymentType;
|
|
TBCDField *tblContactsPaymentAmount;
|
|
TStringField *tblContactsproduct;
|
|
TStringField *tblContactsCustName;
|
|
TTable *tblProducts;
|
|
TIntegerField *tblProductsID;
|
|
TStringField *tblProductsNAME;
|
|
TStringField *tblProductsDescription;
|
|
TDatabase *Database;
|
|
TDataSource *dsProducts;
|
|
TDataSource *dsContacts;
|
|
void __fastcall tblContactsCalcFields(TDataSet *DataSet);
|
|
private: // User declarations
|
|
public: // User declarations
|
|
__fastcall TEBarMegaDemoMainDM(TComponent* Owner);
|
|
};
|
|
//---------------------------------------------------------------------------
|
|
extern PACKAGE TEBarMegaDemoMainDM *EBarMegaDemoMainDM;
|
|
//---------------------------------------------------------------------------
|
|
#endif
|