十万火急！问一个关于SOCKET的问题

Question

我怎样知道断开服务连接的IP地址procedure TFServer.ServerSocketClientDisconnect(Sender: TObject;
      Socket: TCustomWinSocket);
beginend;

Answer 1

偶用另外的办法解决啦
procedure TFServer.Timer1Timer(Sender: TObject);
var
  i:integer;
begin
  listbox1.Clear;
 for i:=0 to ServerSocket.socket.ActiveConnections-1 do
  listbox1.Items.Add(ServerSocket.Socket.Connections[i].RemoteAddress+'/'+Serversocket.Socket.Connections[i].RemoteHost);
end;
用定时器来刷新一下Connections，就OK啦自己结