Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];

Вниз

Стабильный таймер   Найти похожие ветки 

 
WMag   (2003-12-11 19:23) [0]

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


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

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

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;


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

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



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

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

Наверх




Память: 0.44 MB
Время: 0.012 c
1-43463
i-s-v
2004-02-16 22:34
2004.03.14
Вопрос по контекстному меню.


14-43762
Думкин
2004-02-23 05:44
2004.03.14
С днем рождения! 23 февраля.


14-43810
syte_ser78
2004-02-22 00:29
2004.03.14
free delphi


3-43401
AGN
2004-02-12 13:43
2004.03.14
DBGrid - печать


1-43653
Powerland Software
2004-03-01 20:38
2004.03.14
Memory





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский