unit DefSocket; interface uses Windows, WinSock, Classes, LibThread; const SocketReader_BufferSize = 8192; type {$EXTERNALSYM TSocket} TSocket = u_int; const SIO_GET_INTERFACE_LIST = $4004747F; IFF_UP = $00000001; IFF_BROADCAST = $00000002; IFF_LOOPBACK = $00000004; IFF_POINTTOPOINT = $00000008; IFF_MULTICAST = $00000010; const {$EXTERNALSYM INVALID_SOCKET} INVALID_SOCKET = TSocket(NOT(0)); {$EX..