Подскажите как можно добавить к существуемому пакету - 00 00 00 00 00 00 00 00 00 00 00 00 00 00
Пробывал так, некатит
begin
if Fromclient and (pck[1]=#$2E) then
begin
buf:=pck + hstr('00 00 00 00 00 00 00 00 00 00 00 00 00 00')
pck :='';
SendToServer;
end;
end;
|