Source position: IdWinsock2.pas line 2837
type LPFN_WSADUPLICATESOCKETA = function(
const s: TSocket;
const dwProcessId: DWORD;
lpProtocolInfo: LPWSAPROTOCOL_INFOA
):Integer;