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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ScktComp.hpp>
#include <Buttons.hpp>
#include <ExtCtrls.hpp>
#include <stdio.h>
#include <Menus.hpp>
#include <ComCtrls.hpp>

#define MAX_COM 5
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE 管理のコンポーネント
    TServerSocket *ServerSocket1;
    TClientSocket *ClientSocket1;
    TMainMenu *MainMenu1;
    TMenuItem *File1;
    TMenuItem *Exit1;
    TBevel *Bevel1;
    TPanel *Panel1;
    TBitBtn *BitBtn1;
    TButton *Button2;
    TPanel *Panel2;
    TGroupBox *GroupBox1;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label3;
    TLabel *Label4;
    TEdit *Edit1;
    TEdit *Edit2;
    TEdit *Edit3;
    TComboBox *ComboBox1;
    TButton *Button1;
    TListBox *ListBox1;
    TButton *Button3;
    TButton *Button4;
    TButton *Button5;
    TPanel *Panel3;
    TMemo *Memo1;
    TMemo *Memo2;
    TMenuItem *EnvMenu;
    TStatusBar *StatusBar1;
    TMenuItem *Help1;
    TMenuItem *N1;
    TMenuItem *N2;
    TPanel *Panel4;
    TGroupBox *GroupBox2;
    TCheckBox *CheckBox1;
    TSpeedButton *SpeedButton1;
    TSpeedButton *SpeedButton2;
    TMenuItem *N3;
    TButton *Button6;
    void __fastcall ServerSocket1ClientRead(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall Button1Click(TObject *Sender);
    void __fastcall Button2Click(TObject *Sender);
    void __fastcall Button3Click(TObject *Sender);
    void __fastcall Button4Click(TObject *Sender);
    void __fastcall ClientSocket1Read(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall Edit2Change(TObject *Sender);
    void __fastcall Button5Click(TObject *Sender);
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall ComboBox1Change(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall ClientSocket1Error(TObject *Sender,
          TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
          int &ErrorCode);
    void __fastcall ServerSocket1ClientDisconnect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ServerSocket1ClientConnect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall FormResize(TObject *Sender);
    void __fastcall Exit1Click(TObject *Sender);
    void __fastcall ConnectMenuClick(TObject *Sender);
    void __fastcall ListBox1KeyPress(TObject *Sender, char &Key);
    void __fastcall ListBox1Click(TObject *Sender);
    void __fastcall ClientSocket1Connect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall Memo1KeyUp(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall ServerSocket1Listen(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ClientSocket1Disconnect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall Help1Click(TObject *Sender);
    void __fastcall N2Click(TObject *Sender);
    void __fastcall SpeedButton1Click(TObject *Sender);
    void __fastcall SpeedButton2Click(TObject *Sender);
    void __fastcall N3Click(TObject *Sender);
    void __fastcall Button6Click(TObject *Sender);
private:	// ユーザー宣言
    TFileStream *serv;
    struct Connect
    {
        int port;
        AnsiString service;
    } connect1[200];

    AnsiString ClientSysCom[MAX_COM],ServerSysCom[MAX_COM];

    void SendSystemData(AnsiString,TCustomWinSocket*);
    void ClientReceiveSystemData(AnsiString);
    void ServerReceiveSystemData(AnsiString,TCustomWinSocket*);
public:		// ユーザー宣言
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif