[Лунтик-Некрофил]

Как обработать ошибку, если, например, указан неверный порт или сервер просто не включен?
пытался через

Код:

try
clientsocket.Open ;
except
on esocketerror do showmessage('ыыы');
end;

но не прокатило(

[Лунтик-Некрофил]

А все, тут разобрался. Все ошибки сокета пронумерованны, поэтому если ловим такую-то ошибку, то просто присваиваем ноль=)

[tonick2001]

А можно по подробней, чему присваивать 0???

[NumLock]

у TClientSocket событие OnError:

Код:

procedure TForm1.ClientSocket1Error(Sender: TObject;
  Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
  var ErrorCode: Integer);
begin
  ErrorCode:=0;
end;