請問大俠如何判定自已電腦是否連在InterNet 上?

Question

我現在用的是函數InternetCheckConnection,
感覺起來好慢,
請問有沒有更好的函數或是方法?

Answer 1

uses WinInet
InternetCheckConnection

Answer 2

我也只知道InternetCheckConnection,
如果是電腦沒有連到InterNet 的話，一般要3--5秒鐘才會知道,function GetOnlineStatus: Boolean;
var
  ConTypes: Integer;
begin  ConTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
  if (InternetGetConnectedState(@ConTypes, 0) = False)
    then
    Result := False
  else
    Result := True;
end;上面函數也能判斷自已的電腦是否連到網絡，是局域網也返為真.速度極快