Source position: jwawinsock2.pas line 2410
function getpeername(
s: TSocket;
name: PSockAddr;
var namelen: Integer
):Integer;