B billwon Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #2 uses wininet var flags:dword; begin if InternetGetConnectedState(@flags, 0) then begin trayicon.Hint :='Internet连接中'; end else begin trayicon.Hint :='Internet未连接'; end; end;
uses wininet var flags:dword; begin if InternetGetConnectedState(@flags, 0) then begin trayicon.Hint :='Internet连接中'; end else begin trayicon.Hint :='Internet未连接'; end; end;
G guowzgyc Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #3 楼上,我要求的不只是Internet连接,而是网络连接,如我将网线拔下,网络中断的消息等
D dorser1 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #4 那你可以ping一个固定网址,这个控件很多的,ping不到了就断了:)
B billwon Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #10 我用的D7,估计D6里也有,在INTERNET里有个TCPCLIENT控件 TcpClient1.RemoteHost := 'www.sina.com.cn'; TcpClient1.RemotePort := '80'; if TcpClient1.Connect then showmessage('连接中') else showmessage('连接断开') end;
我用的D7,估计D6里也有,在INTERNET里有个TCPCLIENT控件 TcpClient1.RemoteHost := 'www.sina.com.cn'; TcpClient1.RemotePort := '80'; if TcpClient1.Connect then showmessage('连接中') else showmessage('连接断开') end;
L LiChaoHui Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-05 #12 一个监视网络流量的API函数 使用了 iphlpapi.dll 使用IphlpApi.dll中的函数GetIfTable来监视网络数据流量,全部用Delphi编写 http://61.132.118.185:8080/dispdocnew.php?id=4498
一个监视网络流量的API函数 使用了 iphlpapi.dll 使用IphlpApi.dll中的函数GetIfTable来监视网络数据流量,全部用Delphi编写 http://61.132.118.185:8080/dispdocnew.php?id=4498