F FLYINGFDK11 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #1 比如我是通过LAN上网的，用社么函数得知网络是通的。（不要告诉我用PING），请高手指教
卷 卷起千堆雪tyn Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #2 procedure TForm1.Button1Click(Sender: TObject); begin if GetSystemMetrics(SM_NETWORK) AND $01 = $01 then ShowMessage('Machine is attached to network') else ShowMessage('Machine is not attached to network'); end;
procedure TForm1.Button1Click(Sender: TObject); begin if GetSystemMetrics(SM_NETWORK) AND $01 = $01 then ShowMessage('Machine is attached to network') else ShowMessage('Machine is not attached to network'); end;
J j_shen2000 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #3 这个问题已经问过很多遍了，你应该先搜索一下。 例如：http://www.delphibbs.com/delphibbs/dispq.asp?lid=458461
苦 苦虫 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-12 #4 if udp.localip='0.0.0.0' then //未上网 else //已上网
