chat.h

网络编程的一些实例

//---------------------------------------------------------------------------
#ifndef chatprogH
#define chatprogH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <Mask.hpp>
#include <ToolWin.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
#include <ScktComp.hpp>
//---------------------------------------------------------------------------
class TAWTalkForm : public TForm
{
__published:	// IDE-managed Components
	TStatusBar *StatusBar1;
	TMainMenu *MainMenu1;
	TMenuItem *File1;
	TMenuItem *Exit1;
	TPanel *Panel1;
	TMemo *Memo1;
	TMemo *Memo2;
	TSplitter *Splitter1;
	TClientSocket *ClientSocket1;
	TMenuItem *MenuConnect;
	TMenuItem *MenuDisconnect;
	TMenuItem *FileSettings;
	TMenuItem *N1;
	void __fastcall MenuConnectClick(TObject *Sender);
	void __fastcall MenuDisconnectClick(TObject *Sender);
	void __fastcall FileSettingsClick(TObject *Sender);
	void __fastcall Memo1KeyDown(TObject *Sender, WORD &Key,
		  TShiftState Shift);
	void __fastcall ClientSocket1Connect(TObject *Sender,
		  TCustomWinSocket *Socket);
	void __fastcall ClientSocket1Disconnect(TObject *Sender,
		  TCustomWinSocket *Socket);

	void __fastcall ClientSocket1Connecting(TObject *Sender,
		  TCustomWinSocket *Socket);
	void __fastcall ClientSocket1Lookup(TObject *Sender,
		  TCustomWinSocket *Socket);
	void __fastcall ClientSocket1Error(TObject *Sender,
		  TCustomWinSocket *Socket, TErrorEvent ErrorEvent,
		  int &ErrorCode);
	void __fastcall ClientSocket1Read(TObject *Sender,
		  TCustomWinSocket *Socket);
	void __fastcall Exit1Click(TObject *Sender);
	void __fastcall ServerSocket1ClientRead(TObject *Sender,
		  TCustomWinSocket *Socket);
	void __fastcall ServerSocket1ClientConnect(TObject *Sender,
		  TCustomWinSocket *Socket);
	

private:	// User declarations
	bool ClientConnected;
	AnsiString NickName;

	void EnableClient();
	void DisableClient();
	void DefaultSBText();

	TCustomWinSocket *OutSocket;
	void __fastcall ValidateControls(TObject *Sender, bool &Done);
public:		// User declarations
	__fastcall TAWTalkForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TAWTalkForm *AWTalkForm;
//---------------------------------------------------------------------------
#endif