masterdetailmultidemodata.h

DevExpress ExpressQuantumGrid Suite v5.9 Full Source

//---------------------------------------------------------------------------

#ifndef MasterDetailMultiDemoDataH
#define MasterDetailMultiDemoDataH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "cxClasses.hpp"
#include "cxGridTableView.hpp"
#include "cxStyles.hpp"
#include <DB.hpp>
#include "cxGridBandedTableView.hpp"
#include "cxGridCardView.hpp"
#include <DBTables.hpp>
//---------------------------------------------------------------------------
class TMasterDetailMultiDemoDataDM : public TDataModule
{
__published:	// IDE-managed Components
  TDataSource *dsFilms;
  TDataSource *dsFilmsPersons;
  TDataSource *dsPersonsLine;
  TTable *tblPersonsLine;
  TAutoIncField *tblPersonsLineID;
  TStringField *tblPersonsLineNAME;
  TDatabase *DataBase;
  TQuery *qryFilmsPersons;
  TStringField *qryFilmsPersonsName;
  TIntegerField *qryFilmsPersonsPersonLineID;
  TStringField *qryFilmsPersonsFIRSTNAME;
  TStringField *qryFilmsPersonsSECONDNAME;
  TStringField *qryFilmsPersonsNICKNAME;
  TStringField *qryFilmsPersonsBIRTHNAME;
  TDateTimeField *qryFilmsPersonsDATEOFBIRTH;
  TStringField *qryFilmsPersonsLOCATIONOFBIRTH;
  TMemoField *qryFilmsPersonsBIOGRAPHY;
  TStringField *qryFilmsPersonsHOMEPAGE;
  TAutoIncField *qryFilmsPersonsID;
  TIntegerField *qryFilmsPersonsFilmID;
  TIntegerField *qryFilmsPersonsBIRTHCOUNTRY;
  TBooleanField *qryFilmsPersonsGender;
  TTable *tblPersonsHelper;
  TAutoIncField *tblPersonsHelperID;
  TStringField *tblPersonsHelperFIRSTNAME;
  TStringField *tblPersonsHelperSECONDNAME;
  TBooleanField *tblPersonsHelperGENDER;
  TStringField *tblPersonsHelperBIRTHNAME;
  TDateTimeField *tblPersonsHelperDATEOFBIRTH;
  TIntegerField *tblPersonsHelperBIRTHCOUNTRY;
  TStringField *tblPersonsHelperLOCATIONOFBIRTH;
  TMemoField *tblPersonsHelperBIOGRAPHY;
  TStringField *tblPersonsHelperNICKNAME;
  TStringField *tblPersonsHelperHOMEPAGE;
  TTable *tblPersonsStaffHelper;
  TAutoIncField *tblPersonsStaffHelperID;
  TIntegerField *tblPersonsStaffHelperFILMID;
  TIntegerField *tblPersonsStaffHelperPERSONLINEID;
  TIntegerField *tblPersonsStaffHelperPERSONID;
  TStringField *tblPersonsStaffHelperDESCRIPTION;
  TDataSource *dsFilmsCompanies;
  TQuery *qryFilmsCompanies;
  TStringField *qryFilmsCompaniesName;
  TStringField *qryFilmsCompaniesType;
  TStringField *qryFilmsCompaniesCountry;
  TStringField *qryFilmsCompaniesWebSite;
  TIntegerField *qryFilmsCompaniesID;
  TIntegerField *qryFilmsCompaniesFILMID;
  TTable *tblFilmsScreens;
  TAutoIncField *tblFilmsScreensID;
  TIntegerField *tblFilmsScreensFILMID;
  TBlobField *tblFilmsScreensSCREEN;
  TBlobField *tblFilmsScreensICON;
  TDataSource *dsFilmsScreens;
  TQuery *qryFilms;
  TAutoIncField *qryFilmsID;
  TStringField *qryFilmsCAPTION;
  TIntegerField *qryFilmsYEAR;
  TStringField *qryFilmsTAGLINE;
  TStringField *qryFilmsPLOTOUTLINE;
  TIntegerField *qryFilmsRUNTIME;
  TStringField *qryFilmsCOLOR;
  TBlobField *qryFilmsPHOTO;
  TBlobField *qryFilmsICON;
  TStringField *qryFilmsWEBSITE;
  TTable *tblGenres;
  TAutoIncField *tblGenresID;
  TStringField *tblGenresNAME;
  TcxStyleRepository *cxStyleRepository;
  TcxStyle *cxStyle1;
  TcxStyle *cxStyle2;
  TcxStyle *cxStyle3;
  TcxStyle *cxStyle4;
  TcxStyle *cxStyle5;
  TcxStyle *cxStyle6;
  TcxStyle *cxStyle7;
  TcxStyle *cxStyle8;
  TcxStyle *cxStyle9;
  TcxStyle *cxStyle10;
  TcxStyle *cxStyle11;
  TcxStyle *cxStyle12;
  TcxStyle *cxStyle13;
  TcxStyle *cxStyle14;
  TcxStyle *cxStyle15;
  TcxStyle *cxStyle16;
  TcxStyle *cxStyle17;
  TcxStyle *cxStyle18;
  TcxStyle *cxStyle19;
  TcxStyle *cxStyle20;
  TcxStyle *cxStyle21;
  TcxStyle *cxStyle22;
  TcxStyle *cxStyle23;
  TcxStyle *cxStyle24;
  TcxStyle *cxStyle25;
  TcxStyle *cxStyle26;
  TcxStyle *cxStyle27;
  TcxStyle *cxStyle28;
  TcxStyle *cxStyle29;
  TcxStyle *cxStyle30;
  TcxStyle *cxStyle31;
  TcxStyle *cxStyle32;
  TcxStyle *cxStyle33;
  TcxStyle *cxStyle34;
  TcxStyle *cxStyle35;
  TcxStyle *cxStyle36;
  TcxStyle *cxStyle37;
  TcxStyle *cxStyle38;
  TcxStyle *cxStyle39;
  TcxStyle *cxStyle40;
  TcxGridTableViewStyleSheet *GridTableViewStyleSheetDevExpress;
  TcxGridBandedTableViewStyleSheet *GridBandedTableViewStyleSheetDevExpress;
  TcxGridCardViewStyleSheet *GridCardViewStyleSheetDevExpress;
  void __fastcall qryFilmsPersonsBeforePost(TDataSet *DataSet);
  void __fastcall qryFilmsPersonsAfterInsert(TDataSet *DataSet);
  void __fastcall qryFilmsPersonsCalcFields(TDataSet *DataSet);
private:	// User declarations
  bool FIsInserting;
  void InsertNewPerson();
  void InsertNewPersonStaff();
public:		// User declarations
  __fastcall TMasterDetailMultiDemoDataDM(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMasterDetailMultiDemoDataDM *MasterDetailMultiDemoDataDM;
//---------------------------------------------------------------------------
#endif