Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Отключить вывод сообщений об ошибках соединения

Автор: Firebird 10.9.2007, 13:34

Если сервер не запущен (TServerSocket), то клиент, пытаясь подключиться, генерирует ошибку: Asynchronous socket error 10061. Также возникает сообщение об ошибке OnError компонента TClientSocket. В этом событии можно вывести какой-нибудь текст типа: Ошибка соединения...
Но также выдается ошибка самим компонетом, можно ли как-нибудь запретить вывод этих сообщений или необходимо редактировать исходник компонента?

Автор: Sanchezzz 10.9.2007, 19:37

Код


procedure TForm1.ClientSocket1Error(Sender: TObject; Socket: TCustomWinSocket;
  ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
ErrorCode=0;// отключить все ошибки.... у сервера также.
end;

Автор: Firebird 11.9.2007, 08:45

То, что надо, Sanchezzz! Спасибо!