⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.h

📁 GPRS上位机C++BUILDER源码 厂家内部资料
💻 H
字号:
//---------------------------------------------------------------------------

#ifndef mainH
#define mainH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <CheckLst.hpp>
#include <ScktComp.hpp>
#include <Menus.hpp>


#define nMaxRecByte  1024
#define nMaxOutByte  1024

//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TPanel *Panel1;
        TPanel *Panel2;
        TPanel *Panel3;
        TPanel *Panel4;
        TSpeedButton *SpeedButton1;
        TStatusBar *StatusBar1;
        TPanel *Panel5;
        TCheckBox *CheckBox11;
        TCheckBox *CheckBox12;
        TCheckBox *CheckBox14;
        TLabel *Label1;
        TEdit *Edit2;
        TEdit *Edit3;
        TEdit *Edit4;
        TLabel *Label2;
        TEdit *Edit5;
        TSpeedButton *SpeedButton2;
        TSpeedButton *SpeedButton3;
        TServerSocket *GSER;
        TLabel *Label3;
        TCheckListBox *AddrList;
        TSpeedButton *SpeedButton4;
        TSpeedButton *SpeedButton6;
        TSpeedButton *SpeedButton5;
        TLabel *Label4;
        TMainMenu *MainMenu1;
        TMenuItem *N1;
        TMenuItem *N2;
        TMenuItem *N3;
        TMenuItem *N4;
        TMenuItem *N5;
        TTimer *Timer1;
        TPanel *Panel6;
        TPageControl *PageControl1;
        TTabSheet *TabSheet1;
        TMemo *Memo2;
        TTabSheet *TabSheet2;
        TGroupBox *GroupBox1;
        TCheckBox *CheckBox6;
        TCheckBox *CheckBox7;
        TCheckBox *CheckBox8;
        TCheckBox *CheckBox9;
        TGroupBox *GroupBox2;
        TCheckBox *CheckBox4;
        TCheckBox *CheckBox5;
        TCheckBox *CheckBox1;
        TGroupBox *GroupBox3;
        TCheckBox *CheckBox3;
        TCheckBox *CheckBox10;
        TGroupBox *GroupBox4;
        TCheckBox *CheckBox13;
        TEdit *Edit1;
        TEdit *Edit6;
        TCheckBox *CheckBox2;
        TCheckBox *CheckBox15;
        TMenuItem *F1;
        TSpeedButton *SpeedButton7;
        TSpeedButton *SpeedButton8;
        TMenuItem *S1;
        TMenuItem *N6;
        TMenuItem *N7;
        TMenuItem *C2;
        TMenuItem *R1;
        TMenuItem *T1;
        TMenuItem *X1;
        TMenuItem *S2;
        TMenuItem *S3;
        TTabSheet *TabSheet3;
        TPanel *Panel7;
        TCheckBox *CheckBox16;
        TGroupBox *GroupBox5;
        TEdit *Edit7;
        TLabel *Label5;
        TLabel *Label6;
        TEdit *Edit8;
        void __fastcall CheckBox14Click(TObject *Sender);
        void __fastcall Edit2KeyPress(TObject *Sender, char &Key);
        void __fastcall Edit5KeyPress(TObject *Sender, char &Key);
        void __fastcall Edit4KeyPress(TObject *Sender, char &Key);
        void __fastcall Edit4Change(TObject *Sender);
        void __fastcall CheckBox9Click(TObject *Sender);
        void __fastcall CheckBox8Click(TObject *Sender);
        void __fastcall SpeedButton1Click(TObject *Sender);
        void __fastcall CheckBox11Click(TObject *Sender);
        void __fastcall CheckBox12Click(TObject *Sender);
        void __fastcall CheckBox2Click(TObject *Sender);
        void __fastcall CheckBox15Click(TObject *Sender);
        void __fastcall SpeedButton2Click(TObject *Sender);
        void __fastcall SpeedButton3Click(TObject *Sender);
        void __fastcall SpeedButton5Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall GSERAccept(TObject *Sender,
          TCustomWinSocket *Socket);
        void __fastcall GSERClientDisconnect(TObject *Sender,
          TCustomWinSocket *Socket);
        void __fastcall GSERClientRead(TObject *Sender,
          TCustomWinSocket *Socket);
        void __fastcall SpeedButton4Click(TObject *Sender);
        void __fastcall SpeedButton6Click(TObject *Sender);
        void __fastcall F1Click(TObject *Sender);
        void __fastcall CheckBox1Click(TObject *Sender);
        void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall SpeedButton7Click(TObject *Sender);
        void __fastcall SpeedButton8Click(TObject *Sender);
        void __fastcall N6Click(TObject *Sender);
        void __fastcall GSERClientError(TObject *Sender,
          TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
          int &ErrorCode);
private:	// User declarations
//        char  cRecDatBuf[nMaxRecByte ];
        char  cOutDatBuf[nMaxOutByte ];
        bool  DataLock;
        AnsiString __fastcall RecByteToTxt(unsigned char *cRecByte,int  nRecByte);
        AnsiString __fastcall RecByteToHex(char *cRecByte,int  nRecByte);
        void __fastcall SaveCommData();
        void __fastcall DispCommData(char *cRecByte,DWORD nRecByte,AnsiString RemoteAddress);
        void __fastcall Delay(DWORD iDelay);
        int __fastcall  String2Bytes(const char* pSrc, unsigned char* pDst, int nSrcLength);
        int  __fastcall BuiltUpBuf(bool bTxt,bool bHex,AnsiString asTxt,AnsiString asHex);
        void __fastcall SendData(int nSendByte );
        void __fastcall HeartRPT(char *pcDat,int iPGL,TCustomWinSocket *Socket);

public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -