procedure WSGetSockName(ASocket: TIdStackSocketHandle; var AFamily: Integer; var AIP: string; var APort: Integer); virtual; abstract;