Const NicK='Ник)'; var Name:integer; begin if FromServer and (pck[1]=#$03) then Name:=ReadD(22) ; begin if (NicK<>Name) then pck:='' end; end.
Const NicK='Ник)'; var Name:string; begin if FromServer and (pck[1]=#$03) then begin Name:=ReadS(22) ; if (NicK<>Name) then pck:='' end; end.