如何用TRY...except捕捉服务器连接异常？（在线等）

Question

我在客户端指定服务器名如果错误如何及时提示用户，而不陷入死等？

Answer 1

是不是要这个？
    try
      data.adoconnection1.connected:=true;
    except
      Application.MessageBox('数据库服务器登录失败，请检查：'+#13#10#13#10+
      '1.输入是否正确。'+#13#10+
      '2.数据库服务是否正常运行。'+#13#10+
      '3.网络连接是否正确。','错误',MB_OK);    
      application.Terminate;
    end;

Answer 2

可他在提示之前先说服务器不可用出现异常，后出现EXCEPT 的提示如何解决？

Answer 3

你说的是在调试状态下吧
执行。exe应就是except部分了

Answer 4

那客户端中已经安装了delphi，有的资料上说：只需将客户端的.exe文件拷贝到
客户机上就可以运行与服务器相对连。为什么我们这个连主界面都不出现，直接出现
delphi调试界面？

Answer 5

按上面的代码编译后,直接运行EXE文件就好了!