Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.23;
Скачать: CL | DM;

Вниз

Обработка исключений в Socket   Найти похожие ветки 

 
Ural_angel ©   (2007-01-29 12:46) [0]

Проблема такая: нужно поставить обработуку исключительной ситуации при подключении SocketClient`а... Предположим, сервер еще не запущен... В этом случае по стандарту выдается предупреждение в виде диалогового окна... мне же оно (это диалоговое окно) не нужно... В идеале нужно преостановить на t времени процедуру подключения, не предупреждая об этом юзера...


 
Сергей М. ©   (2007-01-29 13:02) [1]


> SocketClient`а


Нет таких компонентов в штатной поставке Делфи.
Есть TClientSocket.


> В этом случае по стандарту выдается предупреждение в виде
> диалогового окна


По какому такому "стандарту" ?
Нет на эту тему никаких стандартов.


> мне же оно (это диалоговое окно) не нужно


Либо переводи гнездо в блок.режим и обрабатывай эти исключения с пом. try..except либо обрабатывай событие OnError след.образом:
Errorcode := 0;
Socket.Close;


> нужно преостановить на t времени процедуру подключения,
> не предупреждая об этом юзера


При обработке искл.ситуации запускай таймер с периодом t, в обработчике события таймера останвливай его и запускай процедуру подключения вновь.


 
Ural_angel ©   (2007-01-29 13:18) [2]

Сори, перепутал... ClientSocket...
Спасибо за совет!!!


 
grisme ©   (2007-01-30 05:25) [3]

тебе же Borland специально евент описал, который зовут OnError :) по errorcode определяешь ашыпку, потом нилишь errorcode



Страницы: 1 вся ветка

Текущий архив: 2007.09.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
15-1187856224
Alien1769
2007-08-23 12:03
2007.09.23
Пособие для руководителей


10-1137332844
evgeney
2006-01-15 16:47
2007.09.23
Как определить что лист Excel пуст?


11-1171922028
Виталий*
2007-02-20 00:53
2007.09.23
Проблема с прозрачностью на ровном месте.


2-1188221033
cvg
2007-08-27 17:23
2007.09.23
Не компилирует функцию, возвращающую структуру :(


2-1188393427
gentos
2007-08-29 17:17
2007.09.23
ActiveCell.FormulaR1C1 = "=SUM(R[-CInt(num)]C:R[-1]C)"