Вниз
Скачать: CL | DM;

Socket exception   Найти похожие ветки 

 
asphix ©   (2003-04-16 12:19) [0]

Добрый день.

Вот кусок кода, где надо отловить ошибку:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
try
client1.Open;
client1.Socket.SendText("#");
except
client1.Close;
checkbox1.Checked:=false;
end;
end;


Если на другом конце сервер сдох - то вываливается ошибка 10053. И никак не могу перехватить её :-(

Дайте грамотный совет?


 
Digitman ©   (2003-04-16 12:39) [1]

читай в хэлпе все касаемое события OnError() - в его обработчике и должна происходить обработка отказов


 
asphix ©   (2003-04-16 14:22) [2]

Спасибо. Проблема решена.

В обработчике OnError делаю
ErrorCode:=0;
//дальше обработчик ошибки...

-----------

Странно, но почему-то не помогла конструкция типа:
try
..
except
..
end;

Ошибка всё равно выдаётся :(


 
savva ©   (2003-04-16 14:27) [3]

если ты про

> try
> client1.Open;
> client1.Socket.SendText("#");
> except
> client1.Close;
> checkbox1.Checked:=false;
>
end;
> end;

то вроде закрытый сокет закрывать не надо..



 
Digitman ©   (2003-04-16 14:30) [4]


> Странно, но почему-то не помогла конструкция типа


для неблок.режима - ничего странного, так и должно быть



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
14-60372
Eagle Owl
2003-06-02 21:23
2003.06.19
Установка компонент


4-60460
()utLaw
2003-04-20 23:07
2003.06.19
Смена местами пунктов в меню и дереве


14-60371
LordOfSilence
2003-06-02 17:30
2003.06.19
Извиняюсь, мужики, не сумел удержаться :-)


1-60124
SoftAl
2003-06-06 12:57
2003.06.19
Установка Delphi


1-60136
sapsi
2003-06-06 09:13
2003.06.19
Конвертация Excel файла в формат факс-сообщения




   Наверх