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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> У сокета ошибка, где ловить Exeption? не выводить стандартное окно Exep 
:(
    Опции темы
ErManDir
Дата 29.6.2005, 15:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

Репутация: нет
Всего: нет



Задача в следующем, при несуществующем сервере Клиент при коннекте получает ошибку 10061. Значить так. Я ставлю обработчик на событие OnError, где вывожу UserFrendly окошечко, А затем выводится стандартное окно Exeption. Как мне это поганое окно не показывать?
Рещение Try Except на главный модуль не предлагать. Только локальные решения.
PM MAIL ICQ YIM   Вверх
Rrader
  Дата 29.6.2005, 15:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Inspired =)
***


Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 1
Всего: 191



Код

Procedure TForm1.ClientSocket1Error(Sender: TObject;
  Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
  Var ErrorCode: Integer);
Begin
  ShowMessage('Ошибка!');
  ErrorCode := 0;
End;


Это сообщение отредактировал(а) Rrader - 29.6.2005, 16:06


--------------------
Let's do this quickly!
Rest in peace, Vit!
PM MAIL Skype   Вверх
ErManDir
Дата 30.6.2005, 11:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

Репутация: нет
Всего: нет



Спасибо! А задачка то решалась очень просто. smile
PM MAIL ICQ YIM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Сети"
Snowy
Poseidon
MetalFan

Запрещено:

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

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

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

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Сети | Следующая тема »


 




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


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

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