⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gclient.h

📁 网络极速寻呼源码
💻 H
字号:
//---------------------------------------------------------------------------

#ifndef GClientH
#define GClientH
//---------------------------------------------------------------------------
#include <SysUtils.hpp>
#include <Controls.hpp>
#include <Classes.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <StdCtrls.hpp>
#include <winsock.h>
#include "datastr.h"
#define WM_CHATCLIENT WM_USER+0X123
//---------------------------------------------------------------------------
class PACKAGE GClient : public TRichEdit
{
private:
	char*RBuffer,*tBuffer,*SRBuffer,*szTemp,*pdhchar;
	int RSize,tSize,SRSize,curRSize,curSRSize,dhSize;
	PDATAHEADER pdh;
	int maxChaters,id,zeroInt;
	SOCKET sk;
	sockaddr_in sock;
	TToolBar*lv;
	bool canWrite,bCancel,bConnected;
	BOOL bbisi;
	void Read();
	void SendInfo();
	void Send();
	TColor colortext;
	TToolButton*tButton;
	void __fastcall HandleChat(TMessage&);
	TNotifyEvent FOnSay,
					 FOnClosed,
					 FOnConnected,
					 FOnConnectFailed,
					 FOnButtonClick;
	TPopupMenu *FButtonMenu;
protected:
public:
	__fastcall GClient(TComponent* Owner);
	u_long ip;
	unsigned short Port;
	PInfo pi;
	bool Connect();
	void Close();
	void Write(char*wBuffer,int size,int toid);
	int indexByID(int);
	PGCU gcu;
__published:
	__property TToolBar *ClientList={read=lv,write=lv};
	__property bool Connected={read=bConnected};
	__property TColor SendColor={read=colortext,write=colortext};
	__property TNotifyEvent OnSay={read=FOnSay,write=FOnSay};
	__property TNotifyEvent OnConnected={read=FOnConnected,write=FOnConnected};
	__property TNotifyEvent OnClosed={read=FOnClosed,write=FOnClosed};
	__property TNotifyEvent OnConnectFailed={read=FOnConnectFailed,write=FOnConnectFailed};
	__property TPopupMenu* ButtonMenu={read=FButtonMenu,write=FButtonMenu};
	__property TNotifyEvent OnButtonClick={read=FOnButtonClick,write=FOnButtonClick};
BEGIN_MESSAGE_MAP
VCL_MESSAGE_HANDLER(WM_CHATCLIENT,TMessage,HandleChat);
END_MESSAGE_MAP(TRichEdit);
};
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -