我用IdTCPServer做socket通信程序,遇到程序老抛出错误:强迫关闭远程连接,想将该错误屏蔽,怎么做? 想在OnException中处理,但不知该怎么写,帮忙一下啊//Exception和application.Exception应该差不多吧IdTCPServer1Exception(AContext: TIdContext;AException: Exception);beginend; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这个事件里面是已经出现异常了,才执行,你想屏蔽错误必须在代码中用try //可能出现异常的代码catch //end这样不是很好吗? Try //可能出异常的代码Except //在这里捕获并处理异常 //试试用 GetLastError()捕获异常代码End;IdTCPServer在还有客户端连接的时候自己不能直接关闭连接,可以通知所有客户端,让所有客户端全部主动断开连接,然后再关闭服务器. 就是呀,用TRY EXCEPT END 很标准的方法嘛何必弄这么麻烦。 但是我想知道错误代码是何原因引起的,如果except的话,说不定网络就一直不正常了,反正没错误出现,我想要知道大致原因,然后想法屏蔽之 tryexcept on e:exception do begin showmessage(e.message);//e.message就是错误原因 end;end; 请教一个菜鸟问题,dll里面的循环 关于数组的问题:如何实现像sql中的distinct那样的功能... 在dbgird中日期型数据如何显示的时候只为年月,不要日. delphi2006安装的问题! ★关于“错误信息”的捕捉问题??? 如何将窗口Test生成可视继承控件(而不是生成继承窗口)?????谢谢!!!(在线等) 友类的一个用途!!!! 想要选出表中某字段排行前十位的行,用select如何实现? delphi怎么样和sql-server联系起来使用啊 ? ole的小问题? 如何在combobox中显示网格?就象STRINGGRID里面的那种格子一样 不解,前途迷茫
try
//可能出现异常的代码
catch
//
end
这样不是很好吗?
//可能出异常的代码
Except
//在这里捕获并处理异常
//试试用 GetLastError()捕获异常代码
End;IdTCPServer在还有客户端连接的时候自己不能直接关闭连接,可以通知所有客户端,让所有客户端全部主动断开连接,然后再关闭服务器.
很标准的方法嘛
何必弄这么麻烦。
except
on e:exception do
begin
showmessage(e.message);//e.message就是错误原因
end;
end;