Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 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]

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



Страницы: 1 вся ветка

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

Наверх





Память: 0.45 MB
Время: 0.004 c
3-80448
KLM
2002-02-27 14:45
2002.03.25
Кто работал с Raima Data Manager?


1-80583
heruvim4ik
2002-03-10 11:07
2002.03.25
Как сделать, чтоб мою прогу нельзя было закрыть никак


1-80574
XPatriot
2002-03-08 11:25
2002.03.25
MDIForm ы


4-80719
dr0Ne64
2002-01-24 22:48
2002.03.25
No Ctrl+Alt+Del


3-80419
Rustik
2002-02-26 16:15
2002.03.25
Проблема при построении репорта в Fastreporte





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский