datamodule.h

来自「客户管理系统C++6.0」· C头文件 代码 · 共 60 行

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

#ifndef DataModuleH
#define DataModuleH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <DB.hpp>
#include <DBTables.hpp>
//---------------------------------------------------------------------------
class TDM : public TDataModule
{
__published:	// IDE-managed Components
        TDatabase *Database;
        TTable *T_News;
        TTable *T_Bulletin;
        TTable *T_Forecast;
        TTable *T_PicNews;
        TDataSource *DS_News;
        TDataSource *DS_Bulletin;
        TDataSource *DS_Forecast;
        TDataSource *DS_PicNews;
        TIntegerField *T_NewsNews_ID;
        TStringField *T_NewsNews_Block;
        TStringField *T_NewsNews_Topic;
        TMemoField *T_NewsNews_Text;
        TDateTimeField *T_NewsNews_PTime;
        TIntegerField *T_ForecastForecast_ID;
        TStringField *T_ForecastForecast_Weather;
        TStringField *T_ForecastForecast_Temp;
        TStringField *T_ForecastForecast_WindP;
        TStringField *T_ForecastForecast_WindD;
        TStringField *T_ForecastForecast_Memo;
        TIntegerField *T_ForecastCount_BNews;
        TIntegerField *T_ForecastCount_HNews;
        TIntegerField *T_ForecastCount_CNews;
        TDateTimeField *T_ForecastCount_PTime;
        TIntegerField *T_BulletinBulletin_ID;
        TStringField *T_BulletinBulletin_Flag;
        TStringField *T_BulletinBulletin_Text;
        TTable *T_Count;
        TDataSource *DS_Count;
        void __fastcall DS_ForecastStateChange(TObject *Sender);
        void __fastcall DS_BulletinStateChange(TObject *Sender);
        void __fastcall DS_BulletinDataChange(TObject *Sender,
          TField *Field);
        void __fastcall DS_NewsStateChange(TObject *Sender);
        void __fastcall DS_NewsDataChange(TObject *Sender, TField *Field);
        void __fastcall DS_PicNewsStateChange(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TDM(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TDM *DM;
//---------------------------------------------------------------------------
#endif