TIdStack.GetPeerName

public procedure TIdStack.GetPeerName(

  ASocket: TIdStackSocketHandle;

  var VIP: string;

  var VPort: TIdPort

); overload;

procedure TIdStack.GetPeerName(

  ASocket: TIdStackSocketHandle;

  var VIP: string;

  var VPort: TIdPort;

  var VIPVersion: TIdIPVersion

); virtual; abstract; overload;