TsgcSTUNClient › Gebeurtenissen › OnSTUNResponseSuccess
Wordt geactiveerd wanneer de STUN-server een geslaagde Binding Response retourneert met het toegewezen adres van de client.
property OnSTUNResponseSuccess: TsgcSTUNResponseSuccessEvent;
// TsgcSTUNResponseSuccessEvent = procedure(Sender: TObject; const aSocket: TsgcSocketConnection; const aMessage: TsgcSTUN_Message; const aBinding: TsgcSTUN_ResponseBinding) of object
—
Wordt aangeroepen wanneer de server een Binding Request beantwoordt met een 2xx STUN-respons. aBinding.RemoteIP en aBinding.RemotePort bevatten het reflexieve (NAT-gekoppelde) adres dat door de server is ontdekt; aMessage geeft toegang tot de volledige respons, inclusief eventuele extra kenmerken die worden geretourneerd.
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;