Хелп плз))

[SeregaZ]

так код только на отлов первого и выставление флага. теперь добавляй условие - если флаг есть и пакет равен тому твоему, то блочить.

PHP код:

const
name='Твойник';
var
Q:Boolean;
Procedure Init;
begin
q:=false;
end;
Procedure Free;
begin
end;
begin
if (FromServer) and (Connectname=name) and (pck[1]=#$01) then
begin
   if (q=false)
   then
   begin
      q:=true;
      SendMSG('Пакет принят');
   end
   else begin
      pck:='';
   end;
end;
end. 


с ендами и синтаксисом елсе мог напутать