TsgcSTUNClient › Eventos › OnSTUNResponseSuccess
Disparado quando o servidor STUN retorna uma Binding Response bem-sucedida com o endereço mapeado do cliente.
property OnSTUNResponseSuccess: TsgcSTUNResponseSuccessEvent;
// TsgcSTUNResponseSuccessEvent = procedure(Sender: TObject; const aSocket: TsgcSocketConnection; const aMessage: TsgcSTUN_Message; const aBinding: TsgcSTUN_ResponseBinding) of object
—
Chamado quando o servidor responde a uma Binding Request com uma resposta STUN 2xx. aBinding.RemoteIP e aBinding.RemotePort contêm o endereço reflexivo (mapeado por NAT) descoberto pelo servidor; aMessage dá acesso à resposta completa, incluindo quaisquer atributos extras retornados.
procedure TForm1.oSTUNSTUNResponseSuccess(Sender: TObject;
const aSocket: TsgcSocketConnection; const aMessage: TsgcSTUN_Message;
const aBinding: TsgcSTUN_ResponseBinding);
begin
DoLog('Remote IP: ' + aBinding.RemoteIP +
'. Remote Port: ' + IntToStr(aBinding.RemotePort));
end;