Показать сообщение отдельно
Старый 16.01.2010, 01:23   #1
Местный
 
Аватар для kpa9pt
 
Регистрация: 13.01.2010
Сообщений: 159
Сказал Спасибо: 18
Имеет 30 спасибок в 23 сообщенях
kpa9pt имеет немного плохого в прошлом
По умолчанию проблема с процедурой

Доброго времени суток тому кто читает.
Собственно проблема:

Пишу скрипт и хочу сделать чтоб при отсылке пакета на сервер(в моём случае чтото написать в чате) пакет не отсылался и слался другой (в моём случае это пакет на соц действие - сесть).
Код вот такой, часть конечно:

begin
if FromClient and (pck[1]=hstr('49')) then begin
pck:='';
buf:=hstr('56 00 00 00 00 00 00 00 00 00');
SendToServerEx(name);
end;
end.

Работает без проблем, но если я положу его в процедуру таймера(не буду писать код дело не в нём, работает если под таймер поставить просто пакет на сесть), то ничего не происходит.
Думаю всё дело что под процедурой стоит условие if...then..begin...end;
Но что делать я не знаю чтоб работало по таймеру...
Подскажите плз.
kpa9pt вне форума   Ответить с цитированием