TSocketConnect的异常怎样捕捉?急!!!!!

Question

在三层结构中用TSocketConnect控件连接远程应用服务器,
如果连scktsrvr.exe都没运行
请问怎样去捕捉这个异常呢？
在线等待.
急!!!!!!!!!

Answer 1

try
  SocketConnect1.Connect := true
except
  on e:Exception do
    ShowMessage(e.Message);
end;

Answer 2

这样不行呀
它还是会把那个错误提示出来呀
“Windows Socket Error:不能做任何连接因为目标机器积极地拒绝它.(10061) On Api 'Connect'”

Answer 3

hch_45(HCH ~ahong.net~) 
 这样你试过没行吗？如果行的话那是把它写在哪里呢？我开始也是这样写的
Try
  SocketConnect1.Connect:=True;
Except
  Exit;
End;
可它还是把上面的错误提示给提示出来了呀
我是不想要它把这个提示显示出来哟！该怎么实现呢？

Answer 4

Try
  SocketConnect1.Connect:=True;
Except
  messagebox('远程连接失败，程序即将退出！');
  application.TerminateEnd;
end;

Answer 5

嘿嘿
我现在知道了。
大家的方法都可以。
但是在DELPHI程序下运行时也会报错的，不过它在应用程序下就不会了。
如果谁还有什么好的方法让它在DELPHI  程序下运行时也不报错而且任何提示都不显示出来
的话请发贴哟。
谢谢！！！

Answer 6

那 你 要改变一个选项.好象是DELPHI 调试状态下 用TRY ..EXCEPT .. END 不报错.有这个选项

Answer 7

选中Debugger Options对话框(通过Tools|Debugger Options菜单项进入)的Language
Exceptions页上的Stop on Delphi Exceptions复选框，关闭这个选项即可

Answer 8

晕了，原来你是在用F9运行啊，那样的话默认是DELPHI的异常优先与程序运行异常，所以你每次都能看到错误，但是你运行EXE文件就不会出现DELPHI运行时异常了

Answer 9

ADWARDS00(大拇指) 
  呵呵
  是呀！不过却实在EXE中就不会出现了。
  还有如myling(贫困户)说的在那里取消那个选项后在F9下运行也不会了