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

Вниз

особенности 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
14-90371
evgeg
2001-12-01 11:40
2002.01.28
Про конференцию


3-90217
kay
2001-12-24 22:12
2002.01.28
BDE


3-90195
Вика
2001-12-21 22:25
2002.01.28
Хранимые процедуры и рефреш таблицы


4-90425
Gennady
2001-11-29 11:25
2002.01.28
Clipboard снова...


14-90351
fliz
2001-11-28 17:36
2002.01.28
кто по сколько часов в день программировать способен?





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