Нужна помощь)

[Roman32]

begin
if FromClient and (pck[1]=#$2F) then

вот сам пакет:2F 99 04 00 00 00 00 00 00 00
А надо что то типа:
begin
if FromClient and (pck[1]=#$2F) (pck[1]=#$99) (pck[1]=#$04) then Ну и так далее?
помогите плз)

[goodvin1709]

так так,в общем нихрена непонятно но попробую включить экстрасенсорику.
if FromClient and (pck[1]=#$2F) then

вот сам пакет:2F 99 04 00 00 00 00 00 00 00
А надо что то типа:

begin

if FromClient and (pck[1]=#$2F) (pck[1]=#$99) (pck[1]=#$04) then

Выучите синтаксис паскаля.

begin
if FromClient and (pck[1]=#$2F) then
begin
buf:=hstr('Нужный тебе пакет');
end;
end.

[kpa9pt]

Я думаю пацан хотел чо-то типо

if FromClient and (Connectname=name) then
    begin
        case pck[1] of
            #$2F:
                begin
                    if (Readd(2)=1177) then
                        begin
                             //то что ты задумал
                        end;
                end;
        end;
    end;

[goodvin1709]

Все свои екстрасенсорные версии сюда=)

[Roman32]

Я разобрался,но всё равно спс)мне над чтоб "if" было не по первому байту а по трём,тоесть такая хрень
begin
if FromServer and (pck[1]=#$2F) and (pck[2]=#$99)and (pck[3]=#$04) then