да он вообще тут фигню проверяет, под его условие достаточно сделать так
delphi Код:
if FromServer and (ConnectName='01') then
case pck[1] of
#$29:if not TimerPck.Enabled then TimerPck.Enabled := True else PckIn := True;
end;
Моего терпения хватит еще на 1-2 ответа..