unit1.h

gprs协议实现

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "CPort.hpp"
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <SysUtils.hpp>
#include <Sockets.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TComPort *ComPort1;
        TButton *Button1;
        TButton *Button2;
        TRichEdit *RichEdit1;
        TButton *Button4;
        TButton *Button5;
        TTimer *Timer1;
        TButton *Button6;
        TButton *Button7;
        TButton *Button8;
        TButton *Button9;
        TButton *Button10;
        TEdit *Edit1;
        TLabel *Label1;
        TEdit *Edit2;
        TLabel *Label2;
        TRichEdit *RichEdit2;
        TEdit *Edit3;
        TButton *Button3;
        TButton *Button11;
        TButton *Button12;
        TUdpSocket *UdpSocket1;
        TEdit *Edit5;
        TLabel *Label3;
        TLabel *Label4;
        TButton *Button13;
        TLabel *Label5;
        TLabel *Label6;
        TEdit *Edit7;
        TEdit *Edit4;
        TEdit *Edit6;
        TButton *Button14;
        TButton *Button15;
        TButton *Button16;
        TButton *Button17;
        TEdit *Edit8;
        TButton *Button18;
        TButton *Button19;
        TButton *Button20;
        TButton *Button21;
        TButton *Button22;
        void __fastcall Button2Click(TObject *Sender);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall Edit1KeyPress(TObject *Sender, char &Key);
        void __fastcall Button5Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall FormActivate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall Button9Click(TObject *Sender);
        void __fastcall Button7Click(TObject *Sender);
        void __fastcall Button10Click(TObject *Sender);
        void __fastcall Button8Click(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall ComPort1RLSDChange(TObject *Sender, bool OnOff);
        void __fastcall ComPort1Ring(TObject *Sender);
        void __fastcall Button6Click(TObject *Sender);
        void __fastcall Button4Click(TObject *Sender);
        void __fastcall Button11Click(TObject *Sender);
        void __fastcall Button12Click(TObject *Sender);
        void __fastcall Button13Click(TObject *Sender);
        void __fastcall Button14Click(TObject *Sender);
        void __fastcall Button15Click(TObject *Sender);
        void __fastcall Button17Click(TObject *Sender);
        void __fastcall Button16Click(TObject *Sender);
        void __fastcall Button18Click(TObject *Sender);
        void __fastcall Button19Click(TObject *Sender);
        void __fastcall Button20Click(TObject *Sender);
        void __fastcall Button21Click(TObject *Sender);
        void __fastcall UdpSocket1Receive(TObject *Sender, PChar Buf,
          int &DataLen);
private:	// User declarations

        long TickCount;
        int UartInBytes;
        bool IsReceiving;
        bool IsConnecting;
        bool BeingConnecting;
        char ReceiveBuf[2048];

public:		// User declarations
        int HexToInt(AnsiString S);
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern unsigned char  InBuffer [];	/// Input Buffer for PPP data
extern unsigned short Uart_Receive_Count;
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif