Delphi TCP协议CS结构接收和发送数据实例源码.rar
DelphiTCP协议CS结构接收和发送数据实例源码,两者都要运行,指定端口后双方建立连接,在客户端可向服务端发送消息和数据,服务端可接收数据,server端程序界面效果如图所示。
procedureTSHYServerFm.IdTCPServer1Connect(AContext:TIdContext);
begin
LbLog.Items.Add('来自主机'
AContext.Connection.Socket.Binding.PeerIP
'的连接请求已被接纳!');
AContext.Connection.Socket.WriteLn('10
下载地址
用户评论