|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.05.2012, 21:25 | #1 |
Регистрация: 23.11.2010
Сообщений: 5
|
Проверка работы сайта Delphi
В общем то мне надо првоерить интернет но мне не подходят варианты, где проверка сети идет, поэтмоу я решил проверить доступен ли сайт ya.ru
В общем код: procedure TForm2.Timer1Timer(Sender: TObject); begin idHTTP1.ConnectTimeout:=10; IdHTTP1.Get( 'http://ya.ru' ); Try showmessage('Инет есть'); timer1.Enabled:=false; idhttp1.Disconnect; Except idhttp1.Disconnect; showmessage('Нету инета'); timer1.Enabled:=false; end; End; Что сделать что бы при отсутствия интернета вылазила не системная ошибка TimeOut , а Моя ошибка showmessage('Нету инета'); P.S. Ненадо мне коды проверки подключения ( там проверка идет и по локалу и все аткое) Заранее СПАСИБО |
06.05.2012, 21:35 | #2 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
а вы вне отладчика запустите.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
06.05.2012, 21:39 | #3 |
Регистрация: 23.11.2010
Сообщений: 5
|
TimeOut пишет ВНЕ обработчика ( запускал exe файл)
|
06.05.2012, 21:43 | #4 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,342
|
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
06.05.2012, 21:51 | #5 |
Регистрация: 23.11.2010
Сообщений: 5
|
Спасибо дружище помог очень сильно
|
06.05.2012, 21:51 | #6 |
Регистрация: 23.11.2010
Сообщений: 5
|
Горящая голова знает что делает ^^
|
06.05.2012, 21:51 | #7 |
Регистрация: 23.11.2010
Сообщений: 5
|
Тему можно закрыть)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
UDPClient Проверка работы сервера | SL1CK | Работа с сетью в Delphi | 4 | 13.01.2010 17:01 |
Проверка сайта | }{oт@бь)ч | Работа с сетью в Delphi | 16 | 26.08.2009 20:30 |
Проверка на нажатие кнопки во время работы программы | ToKS | Компоненты Delphi | 18 | 18.05.2009 00:30 |
Проверка работы программы... | DimkinStd | Общие вопросы Delphi | 3 | 26.12.2006 13:24 |