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

KOL && инициализация   Найти похожие ветки 

← →
Denis Myasnichenko   (2003-04-30 10:49) [0]

Есть интересный вопрос, перечитал всю документацию и форум, но ответа не нашел.
Насколько я понял, любая программа на KOL стартует по
run(form:PControl);
а возможно ли стартовать
не создавая формы?
т.е. создать только таймер! и стартовать + обработчик таймера.
Не создавая формы!
???

С уважением, Денис Мясниченко

---

← →
Gandalf ©   (2003-04-30 12:30) [1]

Возможно все, скажем так.
program RegTest;

uses
Windows,
Kol;

var
Timer:PTimer;

procedure OnTimer( Dummy:Pointer; Sender: PObj );
begin
Beep(1000,1);
end;

begin
Applet:=NewApplet("Demo App");
Timer:=NewTimer(1000);
Timer.OnTimer:=TOnEvent(Makemethod(nil,@OnTimer));
Timer.Enabled:=True;
Applet.Visible:=False;
Run(Applet);
end.
Можно конечно и без Applet, например в конце бессконечный цикл, while (true) do;... Но тогда на таймер не останется сил, придется самому тики считать.

---

← →
Denis Myasnichenko   (2003-04-30 13:03) [2]

Пасиба, понятно!
а я думал на кой ёж создается Аплет
ведь активируется ж форма

---

← →
Кладов   (2003-05-04 10:30) [3]

> бессконечный цикл, while (true) do;... Но тогда на таймер
> не останется сил, придется самому тики считать

есть еще sleep. Можно считать кусками по несколько миллисекунд, отдавая прочее время остальным потокам и процессам.

Таймер в KOL привязывается к окну.Несложно использовать функцию SetTimer с параметром hwnd = 0, и просто будет вызываться указанная функция.

---

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

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



Память: 0.45 MB
Время: 0.015 c