Подмена пакета
begin
if FromClient and (pck[1]=#$04)and (not b) then
begin
a:=ReadD(2); x:=ReadD(6);
y:=ReadD(10); z:=ReadD(14);
b:=true;
end;
begin
if fromServer and (pck[1]=#$28) then
pck='28 (как вставить сюда a x y z) ';
Добавлено через 10 минут
пожалуйста подскажите =(
Последний раз редактировалось pmen, 03.06.2009 в 23:33.
Причина: Добавлено сообщение
|