如何尝试从Indy Client到服务器的连接

时间:2014-02-21 20:04:09

标签: delphi delphi-7 indy

我需要从客户端连接到服务器,但如果客户端无法连接到服务器,因为服务器处于脱机状态,我希望它显示一条消息,说明连接到服务器时出错。

我尝试的代码是:

try
 form1.IdTCPClient1.Host := 'localhost';
 form1.IdTCPClient1.Port := 55555;
 form1.IdTCPClient1.Connect;
except
 ShowMessage('Connection Unsuccessful');
end;

但是当我运行该程序时,它仍然给出了套接字错误#10061错误消息。

感谢您的帮助。

1 个答案:

答案 0 :(得分:1)

当您在调试模式下运行应用程序时,您仍会看到所有异常(只要您没有明确告诉IDE忽略某些异常类型)。但是,当您通过自己运行应用程序(无需调试)时,您将看不到这些处理的异常。

您还应该处理异常类型...

try
  form1.IdTCPClient1.Host := 'localhost';
  form1.IdTCPClient1.Port := 55555;
  form1.IdTCPClient1.Connect;
except
  on E: EIdSocketError do begin
    ShowMessage('Connection Unsuccessful: '+E.Message);
  end;
end;