发信人: leezy (【HIT】穆子), 信区: BorlandDev
标  题: 如何检查一个Internet 连接
发信站: 哈工大紫丁香 (2002年01月19日15:50:45 星期六), 站内信件

类　别：网络
中文开发在线原创作品，未经允许，严禁任何形式的转载
确认从 URL.DLL中import InetIsOffline 函数
function InetIsOffline(Flag: Integer): Boolean; stdcall; external 'URL.DLL';

//然后在需要监测连接状态的地方调用
if InetIsOffline(0) then
   ShowMessage('This computer is not connected to Internet!')
else
   ShowMessage(You are connected to Internet!');
//如果有连接，函数返回TRUE ，没有连接或没有尝试连接返回FALSE
注意：
忽略Variable 标志，所以用0。
这个DLL 通常安装在多数计算机上。通常在Win98 上安装或者与Internet Explorer 4或
更高版本，OFFice 97一起安装。

--
°★．☆° ．★·°∴°★．°·∴°☆ ·°∴° ☆．．·°∴°．☆°★°∴°

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.230.122]