TsgcSTUNClient › 事件 › OnSTUNResponseSuccess
当 STUN 服务器返回含有客户端映射地址的成功绑定响应时触发。
property OnSTUNResponseSuccess: TsgcSTUNResponseSuccessEvent;
// TsgcSTUNResponseSuccessEvent = procedure(Sender: TObject; const aSocket: TsgcSocketConnection; const aMessage: TsgcSTUN_Message; const aBinding: TsgcSTUN_ResponseBinding) of object
—
当服务器以 2xx STUN 响应回答绑定请求时调用。aBinding.RemoteIP 和 aBinding.RemotePort 包含服务器发现的反射(NAT 映射)地址;aMessage 提供对完整响应的访问,包括返回的任何额外属性。
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;