TsgcSTUNClient › Events › OnSTUNResponseSuccess
Se déclenche lorsque le serveur STUN retourne une réponse Binding réussie avec l'adresse mappée du client.
property OnSTUNResponseSuccess: TsgcSTUNResponseSuccessEvent;
// TsgcSTUNResponseSuccessEvent = procedure(Sender: TObject; const aSocket: TsgcSocketConnection; const aMessage: TsgcSTUN_Message; const aBinding: TsgcSTUN_ResponseBinding) of object
—
Appelé lorsque le serveur répond à une requête Binding avec une réponse STUN 2xx. aBinding.RemoteIP et aBinding.RemotePort contiennent l'adresse réflexive (mappée par NAT) découverte par le serveur ; aMessage donne accès à la réponse complète, y compris les attributs supplémentaires retournés.
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;