Скачать: CL | DM;

сброс таймера   Найти похожие ветки 

← →
Forsted   (2009-05-07 20:54) [0]

пишу типа такой маленькой текстовой игры и я хочу реализовать систему кулдауна(перезарядки способностей)
procedure TForm4.FireBallClick(Sender: TObject);
begin
enhealth:=enhealth-ogon*10;
trackbar1.Position:=trackbar1.Position-ogon*30;
fireball.Enabled:=false;
firedefend.Enabled:=false; это кнопки
cooldown.enabled:=true; кулдаун ето таймер---ето я так пытался сделать чтоб запускался тока по нажатию на кнопку способность
енд

procedure TForm4.CooldownTimer(Sender: TObject);
begin

if trackbar1.Position<ogon*30 then fireball.Enabled:=false {сравнение для того чтоб определить хватает ли маны}
                                else fireball.Enabled:=true;
енд
но прикол в том что както так полуается что таймер не останавливается и если например поставить 30 сек перезарядку то как тока форма запустилась то таймер и пошел отсчитывать и если нажать на 28 секунде на способность то кулдаун будет тока 2 сек. дак как сделать так чтоб таймер запускался тока када я на кнопку способности нажимаю и при повторном нажатии он опять начинал сначала считать?

---

← →
Сергей М. ©   (2009-05-07 21:07) [1]

Детский сад - штаны на лямках)
Речь не начинающего программиста, но кулхацкера из 6"Б"-класса..

процедурь Форма1КнопкаСпособностиКлац(Сендер: ТОбжект);
бигин
..
.. ДауновКуль.Инейблд := Фолс; // стоп таймер
..
.. ДауновКуль.Инейблд := Тру; // старт таймер
..
энд:

---

← →
Forsted   (2009-05-07 21:09) [2]

если ты не заметил то у меня ето в проге прописано

---

← →
Сергей М. ©   (2009-05-07 21:10) [3]

Оч даже заметил)

А это ты к чему ?

---

← →
Forsted   (2009-05-07 21:11) [4]

еще забыл скопировать что в таймере после проверки :=фолс

---

← →
Сергей М. ©   (2009-05-07 21:11) [5]

И чего ?

---

← →
Forsted   (2009-05-07 21:12) [6]

тогда почему работает так как я описал а не как ты?

---

← →
Сергей М. ©   (2009-05-07 21:20) [7]

А мне почем знать почему ?

Я знаю одно - таймер достоверно останавливается при установке св-ва Enabled = False и стль же достоверно стартует при установке Enabled = True.

Но установка этого св-ва никоим образом не влияет на уже имеющееся сообщение WM_TIMER в очереди оконных сообщений.

---

← →
Forsted   (2009-05-07 21:31) [8]

все я разобрался где моя ошибка спасибо

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c