охрана блокированного сокета

← →
redlord (2005-03-20 23:56) [0]

всем привет .
почему в ниже приведенном коде
(рабочая нить клиента)
поцедура 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) [1]

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

охрана блокированного сокета Найти похожие ветки