Как програмно узнать что началось подключение к интернету?

← →
Начинаюший2 (2005-01-06 18:14) [0]

Мне нужно отловить момент, когда какая прога или юзер запускает подключение к интернету, и если не выполняется условие, то блокировать. Я с этим не разу не сталкивался, может какие компаненты есть, или где можно прочитать по этой теме.

← →
VictorT © (2005-01-06 18:36) [1]

тута кажись есть:
http://delphibase.endimus.com/

← →
Начинаюший2 (2005-01-06 18:50) [2]

>VictorT © (06.01.05 18:36) [1]

Уже посмотрел там, как разорвать соединение есть, как узнать какое соединение. А мне надо узнать о попытке подключения на начальном этаре, пока соединение еще не установлено.

← →
Начинаюший2 (2005-01-06 19:36) [3]

Мда, похоже сегодня не лётный день, люююди есть кто живой.

← →
Начинаюший2 (2005-01-07 16:40) [4]

Ну что, не кто незнает, кинте хотябы ссылку какую по этой теме.

← →
Kerk © (2005-01-07 16:44) [5]

InetIsOffline

← →
antonn © (2005-01-07 16:44) [6]

2Начинаюший2
есть такая тема - RAS. Там и проверить соединение можно, и вырубить.

← →
Начинаюший2 (2005-01-07 16:51) [7]

>Kerk © (07.01.05 16:44) [5]
InetIsOffline

А как примерно прописать подскажеш?

>antonn © (07.01.05 16:44) [6]
2Начинаюший2
есть такая тема - RAS. Там и проверить соединение можно, и вырубить.

И где такая тема, в стандартной справке нет?

← →
antonn © (2005-01-07 17:02) [8]

> Начинаюший2 (07.01.05 16:51) [7]

в яндексе или http://www.torry.net/

← →
Начинаюший2 (2005-01-07 17:30) [9]

>antonn © (07.01.05 17:02) [8]
в яндексе или http://www.torry.net/

Поискал и посмотрел, нечего не нашол, а с английским у меня проблема. Может кто знает, где есть на родном русском есть.

← →
volser (2005-01-07 17:59) [10]

Начинаюший2
RasHangUp
подробности смотри в msdn, без английского никуда.

> Поискал и посмотрел, нечего не нашол, а с английским у меня
> проблема.

на torry в меню(в 2 полоски) ищеш VCL, жмешь, там справа появится поиск(Search), вводи alrasdyn.zip, и качай(14,5кб)

← →
volser (2005-01-07 19:25) [12]

http://www.torry.net/vcl/comms/ras/alrasdyn.zip

На этом сайте этот вопрос задается раз в неделю. Учитесь искать.

P.S. Я сегодня добрый - http://delphimaster.net/view/6-1103442781/

Только не спрашивай, чего с ним делать.

← →
Начинаюший2 (2005-01-11 19:45) [15]

>volser (07.01.05 17:59) [10]
....без английского никуда.

Знаю, да продлематично два языка сразу учить.

>antonn © (07.01.05 19:01) [11]

Ну вообщето, я был не раз на этом сайте, проблема не где лежат компаненты, а понять что ани делают.

>volser (07.01.05 19:25)[12]

За ссылку спасибо volser.

>Piter © (07.01.05 19:33) [13]
На этом сайте этот вопрос задается раз в неделю. Учитесь искать.

Ага, искать то мы могём, да только не всегда находится нужное, как в принципе с вашей ссылкой. Один базар, если не считать ссылку на другую ветку. Там хоть пример есть. Но всёравно спасибо, буду разбираться.

Я тут качнул за весь год архивы по форуму, нашол там один код проверки модема. Ривязал его к таймеру, так он выдаёт месаги и без подключения к нету. Хотел спросить какая месага должна выскачить при подключении, я чтото не разберусь. Если не трудно конечно.

procedure TForm1.Button1Click(Sender: TObject); var CommPort : string; hCommFile : THandle; ModemStat : DWord; begin CommPort := "COM2"; {Open the comm port} hCommFile := CreateFile(PChar(CommPort), GENERIC_READ, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); if hCommFile = INVALID_HANDLE_VALUE then begin ShowMessage("Unable to open "+ CommPort); exit; end; {Get the Modem Status} if GetCommModemStatus(hCommFile, ModemStat) <> false then begin if ModemStat and MS_CTS_ON <> 0 then ShowMessage("The CTS (clear-to-send) is on."); if ModemStat and MS_DSR_ON <> 0 then ShowMessage("The DSR (data-set-ready) is on."); if ModemStat and MS_RING_ON <> 0then ShowMessage("The ring indicator is on."); if ModemStat and MS_RLSD_ON <> 0 then ShowMessage("The RLSD (receive-line-signal-detect) is on."); end; {Close the comm port} CloseHandle(hCommFile); end;

Как програмно узнать что началось подключение к интернету? Найти похожие ветки