unitmain.h

基于MD110程控交换机的计费程序,使用C++Builder开发

//---------------------------------------------------------------------------
#ifndef UnitMainH
#define UnitMainH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DBCtrls.hpp>
#include <Mask.hpp>

#define CM_COMMNOTATION (WM_APP+400)
#include "ThreadComm.h"
#include "UnitComm.h"
//---------------------------------------------------------------------------
class TFormMain : public TForm
{
__published:	// IDE-managed Components
    TTimer *Timer1;
    TPageControl *PageControl1;
    TTabSheet *TabSheet2;
    TGroupBox *GroupBox1;
    THeaderControl *HeaderControl1;
    TMemo *Memo1;
    TStatusBar *StatusBar1;
    TTabSheet *TabSheet4;
    TDBGrid *DBGrid1;
    TTabSheet *TabSheet3;
    TMemo *Memo2;
    TDBGrid *DBGrid2;
    TPanel *Panel2;
    TDBNavigator *DBNavigator1;
    TButton *Button11;
    TButton *Button12;
    TButton *Button13;
    TButton *Button14;
    TTabSheet *TabSheet5;
    TDBGrid *DBGrid3;
    TPanel *Panel3;
    TGroupBox *GroupBox2;
    TLabel *Label6;
    TButton *Button5;
    TEdit *Edit2;
    TButton *Button4;
    TTabSheet *TabSheet6;
    TDBGrid *DBGrid4;
    TPanel *Panel4;
    TLabel *Label1;
    TLabel *Label12;
    TLabel *Label13;
    TGroupBox *GroupBox3;
    TCheckBox *CheckBox21;
    TCheckBox *CheckBox22;
    TCheckBox *CheckBox23;
    TCheckBox *CheckBox24;
    TCheckBox *CheckBox25;
    TCheckBox *CheckBox26;
    TCheckBox *CheckBox27;
    TRadioGroup *RadioGroup1;
    TGroupBox *GroupBox4;
    TCheckBox *CheckBox2;
    TCheckBox *CheckBox1;
    TCheckBox *CheckBox3;
    TEdit *Edit3;
    TDBEdit *DBEdit1;
    TDBEdit *DBEdit2;
    TTabSheet *TabSheet7;
    TGroupBox *GroupBox6;
    TLabel *Label2;
    TLabel *Label3;
    TLabel *Label4;
    TLabel *Label5;
    TEdit *Edit6;
    TEdit *Edit7;
    TEdit *Edit8;
    TEdit *Edit9;
    TDateTimePicker *DateTimePicker1;
    TDateTimePicker *DateTimePicker2;
    TDateTimePicker *DateTimePicker4;
    TDateTimePicker *DateTimePicker3;
    TCheckBox *CheckBox11;
    TCheckBox *CheckBox12;
    TCheckBox *CheckBox13;
    TButton *Button8;
    TEdit *Edit1;
    TDBGrid *DBGrid5;
    TPanel *Panel5;
    TButton *Button9;
    TGroupBox *GroupBox7;
    TLabel *Label7;
    TLabel *Label8;
    TLabel *Label9;
    TLabel *Label10;
    TGroupBox *GroupBox5;
    TGroupBox *GroupBox8;
    TLabel *Label11;
    TButton *Button6;
    TEdit *Edit4;
    TButton *Button7;
    TButton *Button15;
    TButton *Button16;
    TCheckBox *CheckBox14;
    TCheckBox *CheckBox28;
    TCheckBox *CheckBox29;
    TCheckBox *CheckBox30;
    TButton *Button17;
    TDBNavigator *DBNavigator2;
    TTabSheet *TabSheet8;
    TPanel *Panel1;
    TPanel *Panel6;
    TPanel *Panel7;
    TMemo *Memo3;
    TMemo *Memo4;
    TLabel *Label14;
    TLabel *Label15;
    TButton *Button18;
    TButton *Button19;
    TButton *Button20;
    TButton *Button21;
    TGroupBox *GroupBox9;
    TCheckBox *CheckBox4;
    TComboBox *ComboBox1;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall Timer1Timer(TObject *Sender);
    void __fastcall PageControl1Change(TObject *Sender);
    void __fastcall Button5Click(TObject *Sender);
    void __fastcall Button11Click(TObject *Sender);
    void __fastcall Button12Click(TObject *Sender);
    void __fastcall Button13Click(TObject *Sender);
    void __fastcall Button14Click(TObject *Sender);
    void __fastcall Button8Click(TObject *Sender);
    void __fastcall Button6Click(TObject *Sender);
    void __fastcall CheckBox21Click(TObject *Sender);
    void __fastcall Button15Click(TObject *Sender);
    void __fastcall Button16Click(TObject *Sender);
    void __fastcall Button17Click(TObject *Sender);
    void __fastcall Button7Click(TObject *Sender);
    void __fastcall Edit3KeyUp(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall Button18Click(TObject *Sender);
    void __fastcall Button19Click(TObject *Sender);
    void __fastcall Button20Click(TObject *Sender);
    void __fastcall Button21Click(TObject *Sender);
    void __fastcall CheckBox4Click(TObject *Sender);
    void __fastcall ComboBox1Change(TObject *Sender);
private:	// User declarations
    ThreadComm *pThread;
    int CurrentRecord;
    unsigned short NextTime;
    void __fastcall DateTimeInit();
    bool __fastcall DateTimeV();
    void __fastcall BaseFunctionIni();
    unsigned short __fastcall SetClass();
    void __fastcall ControlTimer();
public:		// User declarations
    SCommunication* COMX;
    bool NoEdiet;
    __fastcall TFormMain(TComponent* Owner);
    void __fastcall GetClass(unsigned short cls);

    AnsiString __fastcall GetCommParameter(int * BaudRateP,
        int * ByteSizeP, int * ParityP, int * StopBitsP);
    void __fastcall SetCommParameter(char * DeviceP,
        char * BaudRateP, char * ByteSizeP, char * ParityP,
        char * StopBitsP);

protected:
    BEGIN_MESSAGE_MAP
        VCL_MESSAGE_HANDLER(CM_COMMNOTATION, TMessage, MessageProc)
    END_MESSAGE_MAP(TForm)
    void __fastcall MessageProc(TMessage & Message);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormMain *FormMain;
//---------------------------------------------------------------------------
#endif