Вниз
Скачать: 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.017 c
4-60473
CAHbKA
2003-04-18 09:12
2003.06.19
Проводник


3-60025
xmrz
2003-05-27 00:22
2003.06.19
Работаем с IB по сети


3-60066
(C) Beginner
2003-05-28 13:02
2003.06.19
Ошибки использования БД


14-60420
iluxa
2003-06-03 18:07
2003.06.19
Где купить Delphi 5


14-60346
Darrin
2003-06-02 13:10
2003.06.19
Возможноли отследить отработку процедур в Design-time?




   Наверх