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




Вниз

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


star   (2002-01-04 12:54) [0]

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



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

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



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

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



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

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



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

Для работы тебе необходимо импортировать функцию 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 если соединение установлено.



Vampir   (2002-01-12 21:12) [5]

или...

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
..........
..........

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



Ajax   (2002-01-13 13:31) [6]

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




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




Наверх





Память: 0.72 MB
Время: 0.017 c
1-80525           mike.dld              2002-03-13 09:13  2002.03.25  
paSubProperties


1-80613           Art1                  2002-03-11 14:19  2002.03.25  
Как узнать версию установленного Excel?


1-80560           Aser17                2002-03-08 06:22  2002.03.25  
Помогите перевести компонент из D5 в CB5


6-80642           otari                 2002-01-09 22:20  2002.03.25  
можно ли менять ip через прог?


1-80621           dimonf                2002-03-11 21:07  2002.03.25  
Господа, подскажите, как можно добавлять строки в StringGrid в цикле не зная заранее, сколько у меня, будет записей?