我想用如下程序来判断远程计算机是否在网上,
try
idicmpclient1.host:='192.168.1.202';
idicmpclient1.ping;
if idicmpclient1.replystatus.fromipaddress:='192.168.1.202' then
showmessage('远程计算机在网上。');
except
showemessage('远程计算机不在网上.');
end;
但即使远程计算机不在网上,except也截获不了错误信息,不知其所以然,望各位专家指点。
谢谢!
丁丁
2003.07.05
try
idicmpclient1.host:='192.168.1.202';
idicmpclient1.ping;
if idicmpclient1.replystatus.fromipaddress:='192.168.1.202' then
showmessage('远程计算机在网上。');
except
showemessage('远程计算机不在网上.');
end;
但即使远程计算机不在网上,except也截获不了错误信息,不知其所以然,望各位专家指点。
谢谢!
丁丁
2003.07.05
解决方案 »
- 世界编程大赛头名程序源代码
- dbgrideh的显示问题
- 我遇到与http://expert.csdn.net/Expert/topic/2309/2309466.xml?temp=.9643518同样的问题,谁有办法解决
- 小弟初学,请各位指教阿!!!
- 能否提供一些关于用CREATE TABLE #表名创建临时表的资料?谢谢
- 我要将中文字符下传到单片机,请问我应该怎样传送?
- 关于指针问题?
- 菜鸟一问:关于SQL
- 请问怎么达到这个效果
- 关于ShowWindow的问题,应该不难的,只是搞不懂。
- 在用PRINTER对象打印时,显示的时候用Canvas对象,如何进行缩放操作,
- 老婆冰儿今天生日,身在远方的我只能放分以贺,祝愿老婆青春美丽快乐每一天!(8)
idicmpclient1.host:='192.168.1.202';
idicmpclient1.ping;
if idicmpclient1.replystatus.fromipaddress='192.168.1.202' then
showmessage('远程计算机在网上。')
else
showemessage('远程计算机不在网上.');except
showemessage('远程计算机不在网上.');
end;试试
丁丁
2003.07.05
再选中"Language Exceptions",把"Stop On Delphi Exceptions"前的钩去掉。