Source position: jwawinsock2.pas line 2517
function WSADuplicateSocketA(
s: TSocket;
dwProcessId: DWORD;
lpProtocolInfo: LPWSAPROTOCOL_INFOA
):Integer;