Текущий архив: 2003.10.09;
Скачать: CL | DM;

Вниз

вопрос по ТClientSocket   Найти похожие ветки 

← →
ilka ©   (2003-08-13 16:32) [0]

есть вот такой вот код
try
ClientSocket.Active := true;
while not ClientSocket.Active do
Application.ProcessMessages;//жду пока подключится
//без этого не отправляет
except
ShowMessage("Exception: can""t find server");
ClientSocket.Active:=false;
ClientSocket.Free;
Exit;
end;

прога вылетает (ошибка Asynchrous socket error 10061)но внутрь except почемуто не попадаю

---

← →
Digitman ©   (2003-08-13 16:34) [1]

убери WHILE-цикл, установи перед Active = True св-во ClientType:= ctBloking - попадешь

---

← →
ilka ©   (2003-08-13 16:37) [2]

спасибо заработало

---

← →
Digitman ©   (2003-08-13 16:48) [3]

)

p.s.

"Урраааа !!! Ззззаработалоооо !!!" (с) Простоквашино и Ко

---

Страницы: 1 вся ветка

Текущий архив: 2003.10.09;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.014 c