Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


star ©   (2002-01-04 12:54:00) 

Кажется где-то здесь в форумах видел подобный вопрос, но поиск результатов не дал. Может кто знает, подскажите ...


Ajax   (2002-01-13 13:31:00) [1]

Во всех приведенных способах нужно постоянно мониторить. Проверять значение в реестре или функцию постоянно вызывать... Возможно при соединении отсылается какое-нибудь сообщени???


Vampir   (2002-01-12 21:12:00) [2]

или...

uses ...wininet (или shellapi...ХЗ)
*********
var
IsConnect: Boolean;
Flags: DWORD;

begin
IsConnect := InternetGetConnectedState(@Flags, 0);
if IsConnect then
begin
if INTERNET_CONNECTION_MODEM and Flags <> 0 then
..........
..........

з.ы. Кто стер мою анкету?


Dima-k17   (2002-01-12 12:32:00) [3]

Для работы тебе необходимо импортировать функцию InetIsOffline из URL.DLL:

function InetIsOffline(Flag: Integer): Boolean; stdcall; external "URL.DLL";

а затем поместить в программу простой вызов функции для проверки статуса соединения:

if InetIsOffline(0) then
ShowMessage("This computer is not connected to Internet!")
else
ShowMessage(You are connected to Internet!");

Эта функция возвращает TRUE если соединение с интернетов отсутствует, или FALSE если соединение установлено.


Freedom   (2002-01-11 14:43:00) [4]

поищи в этом же форуме или в факах "как проверить соединение с интернетом" . Я находил, точно есть, и написано довольно просто.


Renard   (2002-01-10 15:51:00) [5]

Примерно здесь изменится значение переменной [HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\RemoteAccess]


Red Alert   (2002-01-04 18:27:00) [6]

Пингуй че-нить периодически.


Наверх

Титульная страница Поиск, карта сайта Написать письмо