type InetState = function(LPDWORD, DWORD):BOOL; stdcall;
var
__inet__:InetState;
hdll: longword;
flag: lpdword;
retval: longbool;
begin
retval:=false;
hdll:=loadlibrary('Wininet.dll');
if hdll = 0 then
begin
showmessage('dll not found');
halt(0);
end;
__inet__:=getprocaddress(hdll,'InternetGetConnectedState');
if @__inet__ = nil then showmessage('function not found');
retval:=__inet__( flag,0);
if retval = true then showmessage('onnline')
else showmessage('offline');
freelibrary(hdll);
end;
Проверить наличие интернета
Как можно минимизировать трафик ?? т.е. какими способами можно узнать о наличии интернета, чтобы свести трафик при этом к минимуму ?
Вообще в инете не раз встречал подобный вопрос, но вразумительного ответа на него так и не нашел. Но вот этот код вроде как работает
Есть ли возможность узнать через прокси ?
тупо if(connect(...)==SOCKET_ERROR){/*нету (:*/}else{closesocket(...);} и все - пинг ведь тебе не нужен :)
а может тебе просто нужно узнать есть ли сигнал? т.к. если у тебя сигнала нет, то и инета нет, а если есть - то инет тоже есть, если у тебя конечно деньги на счету есть.
Цитата: kosfiz
а может тебе просто нужно узнать есть ли сигнал? т.к. если у тебя сигнала нет, то и инета нет, а если есть - то инет тоже есть, если у тебя конечно деньги на счету есть.
а как узнать о присутствии сигнала ?
есть прога для спутниковой "рыбалки"(что-то в этом роде) называется skynet (она при свей работе кажет качество сигнала), так вот в сети можно найти её исходники (на си) и посмотреть как там сигнал определяется.