clientsocket连见出错如何屏蔽问题(55分)

  • 主题发起人 主题发起人 lvzhijong
  • 开始时间 开始时间
L

lvzhijong

Unregistered / Unconfirmed
GUEST, unregistred user!
sockets编程
如果server程序打开,通讯正常
如果server程序未打开,clientsocket.open后会出错,出错信息为"asnychronous
socket error 10061"
如何屏蔽掉这个错误,提示用户服务程序未运行呢?

打开client的代码如下:
if not clientsocket1.Active then
try
clientsocket1.Open;
except
showmessage('与采集机联机失败,请检察网络是否联通');
exit;
end;
 
在窗体上放一个ApplicationEvent,然后在OnExcept里头写代码
 
to 教父:
可以了,多谢。
为什么这个错误信息的错误处理不在expet中执行呢?
我如何知道到底是那个出错处理呢?比如,不一定是我的socket错误,可能是别的。
 
我在编程中也发现:
Try..Except..end也不能捕捉WinSocket错误。
 
参见
http://www.delphibbs.com/delphibbs/dispq.asp?lid=314764
 
多人接受答案了。
 
在窗体上放一个ApplicationEvent,然后在OnExcept里头写代码??

ApplicationEvent在哪里?如何加!
 
在Additional页中有一个ApplicationEvents控件。
 
后退
顶部