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

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

охрана блокированного сокета [D7, WinXP]

redlord ©   (2005-03-20 23:56:00) 

всем привет .
почему в ниже приведенном коде
(рабочая нить клиента)
поцедура killthread не вызывается
когда сервер завершакт сеанс связи ?

procedure Tthreadinet.Execute;
begin
clientinet.Connect;
 while not Terminated do
 begin
   if not Clientinet.Connected then
     killthread
   else
   try
 resivdata:=clientinet.Receiveln();
   except
    killthread;
   end;
 end;

---

Digitman   (2005-03-21 08:12:00) [1]

потому что либо Clientinet.Connected = True либо Receiveln() не возбуждает исключения

---

Наверх