[求助]使用TServerSocket和TClientSocket进行数据传输设计的问题

Question

最近一个Case用TServerSocket和TClientSocket实现数据网络转发，非阻塞方式传输，其中服务器端用子线程循环获取源数据，同时向在线客户端发送（发送频率较高，数据包大概60字节左右），调试时发现当服务器端在SendBuf过程中，若恰在此时客户端断开连接，则报“远程主机强迫关闭了现有连接”错误，由于发送频率较高，该错误发生几率也很高，求坛子高人指点，万分感谢！

Answer 1

你应该是可以except这个错误的，别让他报错，然后把信息写进日志文件

Answer 2

TServerSocket.OnClientError事件中，将ErrorCode := 0
如：
Memo1.lines.add(Socket.RemoteAddr + ' error:' + SyserrorMessage(ErrorCode));
ErrorCode := 0;