| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Специ помогите. error Socket [D6, WinXP]

Novenkij ©   (2003-09-21 21:54:00) 

Когда ClientSocket не может установить соединение, он выкидывает ошибку 10061.
Как сделать так чтоб не выкидывалось сообщение об ошибке, а программа выполнила, скажем – Memo1.Lines.Add(‘соединения нет’).
Я так понимаю, что-то нужно написать в ClientSocket/Events/onError ?

---

Digitman   (2003-09-22 13:11:00) [1]

> Novenkij


procedure TMyForm.ClientSocketError(...);
begin
ErrorCode := 0;
Socket.Close; // !!!!!!!!!
end;

---

Novenkij   (2003-09-22 00:49:00) [2]

Все всем спасибо, разобрался.
> Анатолий
спасибо ! Error:=0 ! блеск

---

Novenkij   (2003-09-22 00:41:00) [3]


try
ClientSocket1.Active := true;
except
Form1.Caption := "connection failed";
end;


Не помогает, Windows всеравно выкидыват ошибку отсутствия соединения 10061

---

Плохиш_   (2003-09-22 00:32:00) [4]

tru except end

---

Плохиш_   (2003-09-22 00:32:00) [5]

try except end

---

Novenkij   (2003-09-22 00:26:00) [6]

Так я уже делал.
После того как выполнится команда Memo1.Lines.Add("текст");
Windows выкинит сообщение об ошибки 10061, а как сделать что б этого не происходило ???

---

Анатолий   (2003-09-21 23:55:00) [7]

я не профи, но помоему могу помочь
да, надо писать в событии OnError
Error:=0;
Memo1.lines.add("текст");
там в каком то из файлов есть описания кодов ошибок, почитай эту конфу повнимательнее, вопрос избитый уже )

---

Наверх