判断是否联网

判断是否联网

在uses中加入WinInet
if InternetCheckConnection('http://www.sina.com.cn',1,0) then
begin
  showmessage('在线');
end
else
begin
  showmessage('离线');
end; 

或直接用ping后,查看(0% loss)或(100% loss),可知在线或离线

posted @ 2011-07-25 11:56  许明吉博客  阅读(429)  评论(0编辑  收藏  举报