Use ServerSocket to get direct access to the listening Windows socket object that spawned the thread for a client connection it accepted. TServerClientThread passes events and errors to the appropriate event handlers assigned to ServerSocket. TServerClientThread adds itself to the cache of threads maintained by ServerSocket from its constructor, and removes itself when the thread terminates. 

Create 

TServerWinSocket