Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.28;
Скачать: CL | DM;

Вниз

особенности WndProc   Найти похожие ветки 

 
Satrap   (2002-01-06 11:56) [0]

Уважаемые знатоки, возможно я задаю наивный или некорректный вопрос и все же:
На форме расположен компонент TTimer, если нажать и удерживать левую клавишу в
неклиентской области формы, программа перестает попадать в событие OnTimer.
Насколько я понял, это как то связано с устройством процедуры TTimer.WndProc.
Нельзя ли как нибудь избавиться от этого неприятного эффекта?


 
Tolik2002 ©   (2002-01-06 12:03) [1]

Наверное можно. Используй для этого или TThread, или (что проще) мультимедийый таймер.

MMRESULT timeSetEvent(
UINT uDelay,
UINT uResolution,
LPTIMECALLBACK lpTimeProc,
DWORD_PTR dwUser,
UINT fuEvent
);


MMRESULT timeKillEvent(
UINT uTimerID
);

короче смотри м MSDN:
timeBeginPeriod
timeEndPeriod
timeGetDevCaps
timeGetSystemTime
timeGetTime
timeKillEvent
TimeProc
timeSetEvent


 
Satrap ©   (2002-01-07 09:13) [2]

Большое спасибо за помощь, поробую.


 
TonnyS ©   (2002-01-08 16:44) [3]

Ещё вариант таймера (вычитал где-то):

var
uTimerID : cardinal;

procedure FNTimeCallBack(uTimerID, uMessage: UINT;dwUser, dw1, dw2: DWORD); stdcall; //это типа OnTimer
begin
...
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
uTimerID :=timeSetEvent(PrecValue,500,@FNTimeCallBack,100,TIME_PERIODIC); //запуск таймера, PrecValue - интервал, (что значат остальные цифры - не помню)
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
timeKillEvent(uTimerID); //Остановка таймера
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
if uTimerID <> 0 then timeKillEvent(uTimerID); //уничтожаем таймер
end;


вроде всё.


 
Yaro ©   (2002-01-09 04:15) [4]

А чем вам не нравится Виндовская АПИшка SetTimer ? Работает хорошо, почти независимо от программы. Читайте хелп и юзайте!


 
Satrap ©   (2002-01-11 16:05) [5]

Мне все нравиться, просто я программист неопытный, ничего не знаю, поэтому и спрашиваю


 
iZEN   (2002-01-11 20:51) [6]

Использовать TThread однозначно!



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

Текущий архив: 2002.01.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
1-90314
Teapot
2002-01-08 14:30
2002.01.28
Печать на матричный принтер


14-90364
Olgerd
2001-12-02 19:10
2002.01.28
Мелочи. To Merlin.


14-90352
Brand
2001-11-30 23:35
2002.01.28
Кодирование информации


1-90269
ctapik-net
2002-01-09 21:11
2002.01.28
Помогите пожалуйста.


14-90367
M-A-B
2001-12-04 12:13
2002.01.28
SQL