怎样在网线被拔掉时,在程序中像xp系统一样提示网络已断开???

Question

能直接通过截取windows的消息,实现这个功能吗?

Answer 1

var
flags: dword;
begin
if (InternetGetConnectedState(@flags, 0)=False) then
  begin
    dxStatusBar1.Panels[1].Text:='与远程服务端通讯断开';
    dxStatusBar1.Panels[3].Text:='未连接';
  end

Answer 2

上面只是检查是否连结Internet,如果只是在一个局域网内，没有上网，怎样裁判网络是否断开呢？

Answer 3

InternetGetConnectedState Function--------------------------------------------------------------------------------Retrieves the connected state of the local system.SyntaxBOOL InternetGetConnectedState(
    LPDWORD lpdwFlags,
    DWORD dwReserved
);ParameterslpdwFlags
[out] Pointer to an unsigned long integer variable where the connection description should be returned. This can be a combination of the following values:
INTERNET_CONNECTION_CONFIGURED
Local system has a valid connection to the Internet, but it may or may not be currently connected.
INTERNET_CONNECTION_LAN
Local system uses a local area network to connect to the Internet.
INTERNET_CONNECTION_MODEM
Local system uses a modem to connect to the Internet.
INTERNET_CONNECTION_MODEM_BUSY
No longer used.
INTERNET_CONNECTION_OFFLINE
Local system is in offline mode.
INTERNET_CONNECTION_PROXY
Local system uses a proxy server to connect to the Internet.
INTERNET_RAS_INSTALLED
Local system has RAS installed.
dwReserved
[in] Reserved. Must be set to zero.
Return ValueReturns TRUE if there is an Internet connection, or FALSE otherwise.

Answer 4

ping一下网上的网站，如www.163.com