Модераторы: Snowy, Poseidon, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Слежение за подключением и отключеним Интернет 
:(
    Опции темы
Dasha
Дата 21.10.2006, 01:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 18.10.2006

Репутация: нет
Всего: нет
Подскажите как в консольном приложении сделать чтобы программа постоянно следила за подключением в интернет. Допусти подключился юзверь в интернет моя программа, ну допустим должна пикнуть динамиком или выдать мессагу что подключение есть. При отключении тоже самое и так постоянно. При отключении-поключении - сигнал. 

smile 
PM MAIL   Вверх
Snowy
Дата 21.10.2006, 11:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484
Смотри линки внизу страницы

Добавлено @ 11:56 
Также смотри FAQ: http://forum.vingrad.ru/index.php?act=modu...amp;section=797
PM MAIL   Вверх
FF90h
Дата 21.10.2006, 15:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 72
Регистрация: 1.7.2006
Где: Планета Земля

Репутация: нет
Всего: 1
 Тут еще смотря какое подключение .. Вдруг через прокси  smile 
PM MAIL   Вверх
Dasha
Дата 22.10.2006, 11:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 18.10.2006

Репутация: нет
Всего: нет
Как сделать чтобы прога постоянно висела в пямяти и следила за подключениями в инет?  smile 

Код

program inetcon;

uses
  Windows,
  Dialogs;

const
IC_Modem=1;
IC_LAN= 2;
IC_PROXY=3;
IC_MODEM_BUSY=4;
winetdll='wininet.dll';

function InternetGetConnectedState(lpdwFlags:LPDWORD; dwReserved: DWORD): BOOLEAN; stdcall; external winetdll name

'InternetGetConnectedState';



var
dwConnectionTypes: DWORD;
begin

dwConnectionTypes:=IC_MODEM+IC_LAN+IC_PROXY;

if InternetGetConnectedState(@dwConnectionTypes,0) then ShowMessage('You a Connected !!!')
else ShowMessage('No Connection !!!');



end.
PM MAIL   Вверх
Snowy
Дата 22.10.2006, 16:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484
Ну что-то вроде вот этого: http://forum.vingrad.ru/index.php?showtopi...st&p=521765
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0588 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.