Bei Client Disconnect die Nummer rausfinden

[Jumpy]

Vllt. so (ungetestet):

Delphi-Quellcode:

procedure TMain.ServerSocketClientDisconnect(Sender: TObject;
  Socket: TCustomWinSocket);
var i:Integer;
begin
  for i:=0 to Server.Socket.ActiveConnections do
    if Server.Socket.Connection[i].Sockethandle=Socket.SocketHandle then
      //mach was draus
end;

Aber brauchst du das denn? Reicht dir nicht die Socket aus dem Event?