Ошибки... мучают. ServerSocket. [D6, Win95/98]
s002156Shurik © (2002-11-14 01:30:00)
При разрыве связи с клиентом сокет выкидывает Asinchronus
socket error! как сделать чтобы даже при наличии такого или другого
какогонить исключения сообщения о них невыводились. Илиже как мне
их обрабатывать?
savva (2002-11-14 09:25:00) [1]
у сокетов есть обработчик события OnError у TClientSocket и
OnClientError у TServerSoclketю Их обработчики соответственно
выглядят:
procedure TForm2.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
end;
procedure TForm2.ServerSocket1ClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
end;
и если в них сделать
ErrorCode=0;
, то все должно быть так как тебе хочется. Кстати, в этих же
обработчиках можно написать свою реакцию на ошибки..
Наверх 
ЧАТ |
Орешник |
|
