Indy tcp 服务器 - 确定服务器的 IP 和端口

Question

如何使用delphi确定IdTcpServer的“互联网”IP和端口？不是本地（127.0.0.1 或 192.168.0.1），而是公共互联网。

Answer 1

端口和绑定

端口号很容易确定，如果您愿意检查 TIdTcpServer，您会注意到它有一个 DefaultPort 属性和 Bindings因此，如果您询问它“接受连接”的端口，它应该是 DefaultPort，或者 Bindings 中配置的任何端口。一旦会话处于活动状态，该会话将在其自己的动态分配的端口号上处于活动状态。
如果在我的应用程序中，我将 IdTcpServer1.DefaultPort 设置为 90，然后在运行时转储绑定的内容，我会得到以下列表：

0.0.0.0:90
0:0:0:0:0:0:0:0:90

上面显示全零的列表是 IP 地址通配符表示法，告诉我我正在监听在端口 90 处的所有可用本地 IPV4 和 IPV6 地址上。我用来转储上述列表的代码是：

procedure DumpBindings;
var
 n:Integer;
begin
   for n := 0 to IdTCPServer1.Bindings.Count-1 do begin
     with IdTCPServer1.Bindings[n] do begin
        Memo1.Lines.Add( ip+':'+IntToStr(Port) );
     end;
   end;
end;

公共 IP 地址

所以让我们只回到 IP 地址，并忽略端口，对于这个问题的其余部分：

您的计算机可能有一个以太网卡，或一个无线网络适配器，或两者都有，并且这两者中的任何一个都可以有自己的私有地址。其次，如果您是网络管理员并且您已经给了计算机中的任何网络适配器一个公共 IP，那么您计算机中的任何网络适配器也都可以有一个公共 IP。如果您没有配置您正在使用的网络，那么您在计算机上使用可公开访问的 IP 的可能性非常小。

如果您首先查看此处，它会告诉您如何操作，那么您的问题会更好确定您的计算机可以通过哪些 IP 进行访问（枚举所有本地 IP）。然后，您可以询问有关过滤该列表的问题，并通过丢弃私有的不可路由地址来找到正确的列表。但我敢打赌它不适用于您的情况...让我们找出原因...

如果您是普通家庭或企业台式电脑用户，在您的电脑上使用私有 IP 地址，并且您的互联网连接通过网络地址转换 (NAT) 发生，那么答案是您的 PC 甚至没有公共地址。

可以配置基于 NAT 的路由器来转发端口，但我不知道有什么方法可以让转发的接收者知道转发到您的计算机的端口的存在。如果您需要帮助在家中配置基于 NAT 的 DSL 或电缆调制解调器以将端口转发到 Delphi 应用程序，那么最好到其他地方询问。