Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Стабильный таймер [D6, D7, Win95/98, Win2k, WinXP]


WMag ©   (2003-12-11 19:23:00) 

Мастера подскажите плиз, как написать таймер со стабильными временными интервалами. GetTickCount не подойдет, так как он показывается количество прошедших тиков, а мне нужно задать их. Мне сказали, что можно как-то повесить на систему свой VxD или в этом роде и из него через заданное время вызывать свою функцию. Так как это будет на уровне драйвером, то возможно таймер получится стабильным. Но, к сожалению, я не знаю как это можно реализовать. Может кто сталкиваться с этим или поможет какими-нить советами. Буду благодарен.


Talla2k   (2003-12-24 02:22:00) [1]

В потоке(очень даже стабильно) ну и конечно приоритет поднять можно!


ALEIIIKA   (2003-12-23 10:27:00) [2]

Вот пример мультимедиа таймера, может поможет чем.

uses
mmSystem;
var
uTimerId : uint;

procedure FNTimeCallBack(uTimerID, uMessage: UINT;dwUser, dw1, dw2: DWORD) stdcall;
begin
{твой код}
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
uTimerID := timeSetEvent (12, 0, @FNTimeCallBack, 0, TIME_PERIODIC);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
timeKillEvent(uTimerID);
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо