Подмена пакета

[Roman32]

Пакет именно такой длинны,но если я меняю он мне добавляет ещё 4 байта

Добавлено через 37 минут
if FromClient and (pck[1]=#$08) then
begin
pck[34]:=#$01;
pck[35]:=#$00;
pck[36]:=#$00;
pck[37]:=#$00;
pck[38]:='';
pck[39]:='';
pck[40]:='';
pck[41]:='';
end;
Вот чё надо.ток это не помогает дописывает в конце 4 байта,

if FromClient and (pck[1]=#$08) then
begin
pck[34]:=#$01;
pck[35]:=#$00;
pck[36]:=#$00;
pck[37]:=#$00;
pck[38]:=#$00;
pck[39]:=#$00;
pck[40]:=#$00;
pck[41]:=#$00;
end;Вот только так работает но мне надо именно чтоб блокировало 4 байта а не нули

Добавлено через 16 минут
Если не понел вот чё нннадо

[Yegor]

Roman32,

PHP код:

SetLength(pck, Length(pck) - 4);