unit1.h

BCB环境下在使用MSCOMM对串口的编程

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "MSCommLib_OCX.h"
#include <OleCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Dialogs.hpp>
#include <stdio.h>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TMSComm *MSComm1;
        TButton *Button1;
        TButton *Button2;
        TButton *Button3;
        TComboBox *ComboBox1;
        TComboBox *ComboBox2;
        TComboBox *ComboBox3;
        TComboBox *ComboBox4;
        TComboBox *ComboBox5;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        TButton *Button4;
        TShape *Shape1;
        TMemo *Memo1;
        TMemo *Memo2;
        TSaveDialog *SaveDialog1;
        TLabel *Label6;
        TComboBox *ComboBox6;
        TLabel *Label7;
        TLabel *Label8;
        TComboBox *ComboBox7;
        TLabel *Label9;
        TLabel *Label10;
        TButton *Button5;
        void __fastcall MSComm1Comm(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
        void __fastcall Button4Click(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        int __fastcall String2Hex(AnsiString str, unsigned char *senddata);
        char __fastcall ConvertHexChar(char ch);
        void __fastcall Send(void);
        void __fastcall Send_Buf(char * buf);
        int __fastcall AscToInt(AnsiString StrAsc);
        AnsiString __fastcall IntToAsc(int num);
        char __fastcall IntToChar(int num);
        int __fastcall Check_Sum( char * Str,int len);
        bool __fastcall Send_Com(int Address,int Length);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall Button5Click(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif