//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ScktComp.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
    TLabel *Label1;
    TEdit *eHost;
    TListBox *lbHost;
    TEdit *eCOM1;
    TLabel *Label2;
    TListBox *lbCOM1;
    TLabel *Label3;
    TEdit *eCOM2;
    TListBox *lbCOM2;
    TLabel *Label4;
    TButton *btnActive;
    TButton *btnExit;
    TServerSocket *ssHost;
    TServerSocket *ssCOM1;
    TServerSocket *ssCOM2;void __fastcall ssHostClientConnect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ssCOM1ClientConnect(TObject *Sender,
          TCustomWinSocket *Socket);
    
    void __fastcall btnActiveClick(TObject *Sender);
    void __fastcall ssHostClientRead(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ssCOM1ClientRead(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall btnExitClick(TObject *Sender);
    void __fastcall ssHostClientError(TObject *Sender,
          TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
          int &ErrorCode);
    void __fastcall ssCOM1ClientError(TObject *Sender,
          TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
          int &ErrorCode);
    void __fastcall ssHostListen(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ssCOM1Listen(TObject *Sender,
          TCustomWinSocket *Socket);
    
    void __fastcall ssHostClientDisconnect(TObject *Sender,
          TCustomWinSocket *Socket);
    void __fastcall ssCOM1ClientDisconnect(TObject *Sender,
          TCustomWinSocket *Socket);
    
    void __fastcall FormCreate(TObject *Sender);
    
private:	// User declarations
public:		// User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif