TIdHTTPServer和TIdHTTP可以连接相同的可执行文件吗？

Question

我有一个使用TIdHTTPServer的程序。现在我想使用与TIdHTTPServer对话的TIdHTTP编写一些自动化测试。测试代码在程序本身中。

当TIdHTTP尝试连接'套接字错误＃10061连接被拒绝时'。提出异常。我猜这是因为TIdHTTPServer已经在使用该端口了。

同一个可执行文件中的TIdHTTPServer和TIdHTTP是否可以相互通信？如果是这样，怎么样？

Answer 1

是的，它们可以在同一个可执行文件中运行并相互连接。只需在传递给TIdHTTP的URL中指定（一个）TIdHTTPServer的侦听IP，例如：

with IdHTTPServer1.Binding.Add do
begin
  IP := '127.0.0.1';
  Port := 80;
end;
IdHTTPServer1.Active := True;
...
IdHTTP1.Get('http://127.0.0.1/');