通过互联网访问localhost

时间:2017-06-20 08:31:03

标签: delphi-7 indy10 idhttp

我已经通过IdHTTP组件创建了HTTP server,现在我想通过互联网访问它。我已经在文本文件中发布了一个字符串。

我可以通过以下方式访问它:

http://localhost

但我如何通过互联网访问它?我已经尝试了http://[myexternalIPaddress]:80,但我没有得到回复。

这是我的代码:

procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
  myFile : TextFile;
  text: String;
begin
  AssignFile(myFile, 'C:\Users\xxx\Desktop\test.txt');
  Reset(myFile);
  ReadLn(myFile, text);  
  AResponseInfo.ContentText := text;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  IdHTTPServer1.Active := True;
end;

1 个答案:

答案 0 :(得分:1)

您需要配置Windows防火墙(如果已启用)以允许到端口80的入站连接,并且还需要配置网络路由器(如果有)以将入站连接转发到路由器的公共IP上的端口80服务器计算机上的端口80。