![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
вопрос по ТClientSocket [D7, WinXP]
ilka © (2003-08-13 16:32:00)
есть вот такой вот код
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:48:00) [1]
)
p.s.
"Урраааа !!! Ззззаработалоооо !!!" (с) Простоквашино и Ко
ilka (2003-08-13 16:37:00) [2]
спасибо заработало
Digitman (2003-08-13 16:34:00) [3]
убери WHILE-цикл, установи перед Active = True св-во ClientType:= ctBloking - попадешь