Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Обработка ошибок TClientSocket 


Leviathan   (2001-10-11 21:58) [0]

Мастера! Как мне сделать, чтобы при отсутствии сервера вылезало не стандартное дельфовое сообщение об ошибке, а мое? Простовал в try-except засунуть ClientSocket.Active := True; Не помогает.



MAXX   (2001-10-12 00:02) [1]

Если я тебя правильно понял, то нужно, в событии OnError компонента TClienSocket присвоить переменной ErrorCode ноль (ErrorCode:=0) тогда вообще не будет выводится никакого сообщения об ошибке. А если хочешь выводить своё сообщение то туда же можешь вставить что то типа MessageBox(....) или ShowMessage(...) и т.п. При возникновении ошибки её код передаётся в переменную ErrorCode по этому можно для разных ошибок выводить разные сообщения.




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.024 c
1-22210           Man In Red            2001-12-15 20:12  2002.01.08  
Как намутить такое, что бы............................


3-21941           jin                   2001-11-30 14:56  2002.01.08  
Помогите пожалуйста создать процедуру IB SQL из приложения


6-22309           Дремучий              2001-10-10 19:02  2002.01.08  
Есть СЕТЕВАЯ КАРТА без паспорта, запломбирована!


1-22229           Man In Red            2001-12-16 14:31  2002.01.08  
Опять вопрос связаный с RichEdit!


14-22389          sudiv                 2001-11-08 15:38  2002.01.08  
CashFiesta