哪位知道判断局域网连接状态的ApI函数?(100分)

  • 主题发起人 主题发起人 wlw88
  • 开始时间 开始时间
W

wlw88

Unregistered / Unconfirmed
GUEST, unregistred user!
哪位知道判断局域网连接状态的ApI函数?<br>我想实现win2000下任务栏中的网络连接状态的功能!
 
procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp; if GetSystemMetrics(SM_NETWORK) AND $01 = $01 then<br>&nbsp; &nbsp; ShowMessage('Machine is attached to network') else<br>&nbsp; &nbsp; ShowMessage('Machine is not attached to network');<br>end;<br>
 
gz &nbsp;// &nbsp; GetSystemMetrics(SM_NETWORK) AND $01 = $01 &nbsp;&lt;&lt;== 这句看不懂..:(( 头大..<br>
 
那一句的意思是:返回值是否是奇数?<br>即最后一位设置了表示有网格存在。
 
哎呀,,,最近太忙了,,都没时间上来了,,,今天偶上,虽然我的水平不高,<br>但好多问题都可以给出我的答案,,,不对的话,大家讨论 :)<br><br>to wlw88:<br><br>你所说的那个api是在 WinInet.pas 单元中,,函数为<br>BOOL InternetCheckConnection(<br>&nbsp; &nbsp; IN LPCSTR lpszUrl,<br>&nbsp; &nbsp; IN DWORD dwFlags,<br>&nbsp; &nbsp; IN DWORD dwReserved<br>);<br><br>参数的意义是:<br><br>lpszUrl: 需要测试能否建立连接的 URL 地址,可以为空;<br>dwFlags: 目前只能是 FLAG_ICC_FORCE_CONNECTION(这个常量 Delphi 中没有声明,其值为 $00000001);<br>dwReserved: 目前只能为 0。<br><br>呵呵,,我把函数原型都贴出来了,,,<br><br>如果还有不清楚的地方,,你自己到sdk中去找找吧!<br><br>
 
后退
顶部