Форум: "KOL";
Текущий архив: 2003.11.27;
Скачать: [xml.tar.bz2];

Вниз

Таймер в KOL.   Найти похожие ветки 

← →
Kobik   (2003-03-19 19:55) [0]

Буквально вчера скачал библиотеки KOL, почитал уроки, но ничего не нашел в них о таймере. Методом тыка попробовал PTimer:


Procedure timer1( Dummy : Pointer; Sender : PControl );
begin
{ну тут не важно что}
end;

var form:pcontrol;
tim1:ptimer;
begin
form:=newform(applet,"NewForm");
tim1:=newtimer(100);
tim1.OnTimer:=TOnEvent(MakeMethod( nil, @timer1 ) );
run(form);
...


Ничего не происходит и ошибок тоже не выдает.

Help!!!

---

← →
Bartov   (2003-03-19 20:09) [1]

А добавь:
tim1.Enabled := TRUE;

---

← →
Kobik   (2003-03-19 20:16) [2]

Ого!!! как все просто оказалось.

Никогда бы не предположил, что изначально у таймера enabled=false;

Ну вобщем спасибо.

---

← →
Avenger [NhT]   (2003-03-20 13:14) [3]

Да считаю это не совсем прально!
True по дефолту надо чаще всего!
и можно сделать NewTimerEx, где можно было бы сделать ввод не
только интервала, но и Enabled и функцию обработки!

---

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

Форум: "KOL";
Текущий архив: 2003.11.27;
Скачать: [xml.tar.bz2];

Наверх

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