我用clientsocket,serversocket做一设备监控，终端（clientsocket）向上位机（serversocket）连接发数据，有问题(10

我用clientsocket,serversocket做一设备监控，终端（clientsocket）向上位机（serversocket）连接发数据，有问题(100分)<br />clientsocket连接到serversocket后，发送数据
1、clietnsocket非正常断开后，重新会连接产生新的进程，serversocket不会马上判断出断开的进程，问题：serversocket如何正确的向连接的进程回数据呢

作公共的状态变量记录。。。

修改ScktComp单元 1325行，改成如下：
procedure TServerWinSocket.ClientError(Sender:TObject;Socket:TCustomWinSocket;
ErrorEvent:TErrorEvent;var ErrorCode:Integer);
var
ErrorCode1:integer;
begin
ErrorCode1:=ErrorCode;
ClientErrorEvent(Socket,ErrorEvent,ErrorCode);

if ErrorCode1=10053 then // 2006-06-22 只发生在 ServerSocket中
begin
FConnections.Remove(Socket);
end;
end;