怎样判断网络是否联通

[itlcx]

怎样判断网络是否联通,
就像网络不通时，IE有弹出“脱机工作，重试”。
什么能用代码判断出来呢？
谢谢!

[love800309]

try 一下行吗

[liunini]

设好延迟时间 然后用try捕捉

[truemoller]

关注
具体怎么实现呢？~

[tsst]

关注

[overtime]

用Indy的Ipwatch控件，有Online的属性

[yinweixian]

用try捕捉就可以了

[itlcx]

敢问什么是：try捕捉?

[truemoller]

9494
介绍一下何谓try

[itlcx]

to overtime(空间在线):

Ipwatch.IsOnline永远为true;什么使用呢？

[viena]

//怎样判断网络是否联通
如果不是移动，那么就是联通了

[viena]

连通？

[lemon_wei]

delphi上不是有个控件专门是做这个的吗？,可以检测外网和内网。他的内部其实调用的是ping，
要的话留个mail,我发给你。

[ChinaOk]

{=================================================================
功 能: 检测计算机是否上网
参 数: 无
返回值: 成功: True 失败: False;
备 注: uses Wininet
版 本:
1.0 2002/10/07 13:33:00
=================================================================}
function InternetConnected: Boolean;
const
// local system uses a modem to connect to the Internet.
INTERNET_CONNECTION_MODEM = 1;
// local system uses a local area network to connect to the Internet.
INTERNET_CONNECTION_LAN = 2;
// local system uses a proxy server to connect to the Internet.
INTERNET_CONNECTION_PROXY = 4;
// local system's modem is busy with a non-Internet connection.
INTERNET_CONNECTION_MODEM_BUSY = 8;
var
dwConnectionTypes : DWORD;
begin
dwConnectionTypes := INTERNET_CONNECTION_MODEM+ INTERNET_CONNECTION_LAN
+ INTERNET_CONNECTION_PROXY;
Result := InternetGetConnectedState(@dwConnectionTypes, 0);
end;
{检查是否连接到internet}
Function CheckOnlineStatus():boolean;
Begin
Result:=InternetConnected();
End;

[itlcx]

TO:lemon_wei(soft_fans)
谢谢
[e-mail]

[rodmanchen3]

联通的cdma还可以，我现在都用

[lemon_wei]

邮件已发出

[itlcx]

TO:lemon_wei(soft_fans)
收到邮件，在学习你的程序中...
谢谢