Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Вниз

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


Basaev   (2001-11-04 04:44) [0]

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



Ajax   (2001-11-04 09:07) [1]

Один из вариантов - это проверять IP. Если не 127.0.0.1, значит в сети. Но это кажется не слишком надежно.



Di_wind   (2001-11-04 15:40) [2]

Если через модем то на сайте в faq или в компонентах есть готовый ответы, неполенись полазить



Anatoly Podgoretsky   (2001-11-04 15:43) [3]

Определить с помощью чего подключен, с помощью WinInet.dll+GetConnectedState
Возможные варианты
1. не подключен
2. модем
3. LAN или Proxy



krimer   (2001-11-04 18:58) [4]

posilai ping na vsem obsheizvestnii sait tipa list.ru esli dohlii znachit konektu nema



Dabus   (2001-11-04 20:46) [5]

Я попробовал всякие там внешние процедуры из URL.DLL и WININET.DLL -
Скажем URL работать не захотела, а в WININET листинга лишнего много.
Ну полез в реестр. Там ключ есть, он указывает на наличе соединения
Dial-Up. (Если это конечно кому-то поможет. Лично мне помогло!)

var:
i_connected: byte;
r0: TRegistry;

...
...

r0 := TRegistry.Create;
r0.RootKey := HKEY_LOCAL_MACHINE;
r0.OpenKey("System\CurrentControlSet\Services\RemoteAccess", False);
r0.ReadBinaryData("Remote Connection",i_connected,SizeOf(i_connected));
r0.Free;
// i_connected=0 нет связи /=1 есть связь

Кстати. Сайты бывает молчат, особенно популярные. Так-что Ping не выход.
Успехов.



Dima-k17   (2001-11-05 18:37) [6]

Надо импортировать функцию
InetsOffline



Anatoly Podgoretsky   (2001-11-05 20:15) [7]

Это касается только IE, но не относится к подключению к Интернету.




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.041 c
14-90370          limon                 2001-12-04 17:28  2002.01.28  
Тонкости Perl (> Merlin & Co)


14-90354          Semen                 2001-11-21 10:42  2002.01.28  
Отслеживание питания


3-90226           Ross                  2001-12-24 21:58  2002.01.28  
ProgressBar


3-90235           olegd                 2001-12-24 19:00  2002.01.28  
ADO Table


1-90293           Phobos                2002-01-10 23:08  2002.01.28  
Как сделать так чтобы прога при разных разрешениях смотрелась одинаково?