Показать сообщение отдельно
Старый 06.04.2010, 23:11   #38
Местный
 
Аватар для J-Fobos
 
Регистрация: 09.06.2008
Сообщений: 867
Сказал Спасибо: 175
Имеет 468 спасибок в 259 сообщенях
J-Fobos пока неопределено
По умолчанию

Infernale, запустить процедуру юзания банки сразу после/перед включением таймера. Вот так:
Код:
//.........
if (CurMP<MaxMP-2500) then 
beign
OnTimerMP();
TimerMP.enabled:=true;
end 
else 
TimerMP.enabled:=false;
//........

Или еще вариант менять время таймера в самом таймере. Вот так:
Код:
//.........
TimerHP.interval:=1; //интервал 0.001сек
end;

//.........
procedure OnTimerHP(Sender: TObject);
begin
  buf:=HPuse;
  SendToServerEx(Name);
  TimerHP.interval:=15000; //сделали как надо интервал 15сек
end;
//.........
__________________

В любом из нас спит гений. И с каждым днем все крепче.

Переходим на протокол нового поколения jabber

Последний раз редактировалось J-Fobos, 06.04.2010 в 23:22.
J-Fobos вне форума   Ответить с цитированием
За это сообщение J-Fobos нажился спасибкой от: