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

Question

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

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），那么您的问题会更好。 然后，您可能会提出一个有关过滤该列表的问题，并通过丢弃私有的不可路由地址来找到正确的列表。 除了我敢打赌，这种情况在您的情况下不起作用...让我们找出原因...

如果您是普通家用或商用台式PC用户，并且正在使用PC上的专用IP地址，并且通过网络地址转换（NAT）进行Internet连接，那么答案是您的PC甚至没有公共地址。

可以将基于NAT的路由器配置为转发端口，但是我不知道该转发的接收者以任何方式知道转发到您的计算机的端口的存在。 如果您需要在家中配置基于NAT的DSL或电缆调制解调器以将端口转发到Delphi应用程序的帮助，那么最好在其他地方提出这个问题。