unit1.~h

两机通信

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <TabNotBk.hpp>
#include <Dialogs.hpp>
#include <ExtCtrls.hpp>
#define WM_OVERCHECK  (WM_USER + 128)
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
	TTabbedNotebook *TabbedNotebook1;
	TStatusBar *StatusBar1;
	TOpenDialog *OpenDialog1;
	TSaveDialog *SaveDialog1;
	TBitBtn *BitBtn6;
    TPanel *Panel1;
    TLabel *Label1;
    TComboBox *ComboBox4;
    TComboBox *ComboBox5;
    TLabel *Label2;
    TLabel *Label3;
    TComboBox *ComboBox1;
    TLabel *Label4;
    TComboBox *ComboBox2;
    TLabel *Label5;
    TComboBox *ComboBox3;
    TBitBtn *BitBtn1;
    TBitBtn *BitBtn2;
    TBitBtn *BitBtn7;
    TButton *btnExit;
    TSplitter *Splitter1;
    TPanel *Panel2;
    TPanel *Panel3;
    TEdit *Edit3;
    TLabel *Label6;
    TBitBtn *BitBtn3;
    TBitBtn *BitBtn8;
    TBitBtn *BitBtn5;
    TBitBtn *BitBtn4;
    TLabel *Label7;
    TEdit *Edit4;
    TSplitter *Splitter2;
    TPanel *Panel4;
    TMemo *Memo1;
        TLabel *Label8;
	void __fastcall FormCreate(TObject *Sender);
	void __fastcall BitBtn1Click(TObject *Sender);
	void __fastcall BitBtn2Click(TObject *Sender);
	void __fastcall BitBtn3Click(TObject *Sender);
	void __fastcall BitBtn4Click(TObject *Sender);
	void __fastcall BitBtn5Click(TObject *Sender);
	void __fastcall BitBtn6Click(TObject *Sender);
	void __fastcall BitBtn7Click(TObject *Sender);
        void __fastcall BitBtn8Click(TObject *Sender);
        void __fastcall btnExitClick(TObject *Sender);
private:	// User declarations
        void __fastcall WMCOMMNOTIFY(TMessage &Message);
        void __fastcall WMOVERCHECK(TMessage &Message);
        BEGIN_MESSAGE_MAP
          MESSAGE_HANDLER(WM_COMMNOTIFY, TMessage, WMCOMMNOTIFY)
          MESSAGE_HANDLER(WM_OVERCHECK, TMessage, WMOVERCHECK)
        END_MESSAGE_MAP(TForm)
public:		// User declarations
        HANDLE WIND;
        HANDLE Post;
        HANDLE APost;
        HANDLE hb;
        DCB dcb;
        OVERLAPPED re;
        bool Receive;
        unsigned char *buf;
        long  bufl;
        unsigned long  ph;
        unsigned char *InputBuf;
        unsigned long  hadlength;
        unsigned long k;
        unsigned long mlong;
        TSystemTime SysTime;
	__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif