Главная страница
    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.45 MB
Время: 0.012 c
1-43465
_dEMOn
2004-02-29 22:10
2004.03.14
Компоненты


3-43288
tv
2004-02-12 12:24
2004.03.14
Unicode строки в поле типа Memo


6-43740
Pohil
2004-01-04 22:18
2004.03.14
Как мне определить все забитые IP в сети


4-43967
Grinder
2004-01-08 17:37
2004.03.14
Потоки на WinApi


3-43297
hva
2004-02-11 17:20
2004.03.14
как правильно пользовать OnBeforeUpdateRecord





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский