在窗体加此二控件，
指定服务类型或端口号，
如果是自定义的连接，
随便找一个无定义的WORD，
服务器端：
ServerSocket1.Active:=true;//启动服务,进入LISTEN
客户端：
输入主机名Server,然后
ClientSocket1.Host:=Server;
ClientSocket1.Active:=true;
连接成功后
产生TForm1.ServerSocket1Accept事件
与TForm1.ClientSocket1Connect事件
服务器可用
ServerSocket1.Socket.Connections[n].SendText(info);
来对连接到服务器的第n个客户发送信息info
客户机可用
ClientSocket1.Socket.SendText(info)
向服务器发送信息
当有信息发来时分别引发
ClientSocket1Read
与
ServerSocket1ClientRead
事件,可用
Socket.ReceiveText;
来接收信息
