подключение к интернету, есть ли? Опции

[kuzyara]

я нашел три способа как проверить подключение к интернету, но все они говорят неправду!!! почему?? может есть какой-нибудь другой способ??


№1

function InetIsOffline(flag: integer): WordBool; stdcall; external 'url.dll';
-------------------------------------------------------------
if InetIsOffline(0)
      then  ShowMessage('This computer is not connected to Internet!')
      else  ShowMessage('You are connected to Internet!');

№2

uses ..., WinInet;
-------------------------------------------------------------
if InternetCheckConnection(nil,$00000001,0)
       then showmessage('est inet')  
       else showmessage('net ineta');

№3

if GetSystemMetrics(SM_NETWORK) and $01 = $01
       then  ShowMessage('Computer is attached to a network!')
       else   ShowMessage('Computer is not attached to a network!');

[volvo]

Я же просто так ничего не спрашиваю... Ты ничуть не изменил то, что написал выше...

подключен ли компьютер к интернету в данный момент, или нет.

Я же тебя спрашиваю, КАК подключен? Читай, а не просматривай ответы... Соединение обязано быть физическим? Попробуй ответить на этот вопрос...