| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Screensaver [D7, XP]
tq © (2005-11-18 17:09:00)Я кинул таймер:
procedure TForm1.ScreenTimerTimer(Sender: TObject);
begin
screentime:=screentime+1000;
if screentime=60000 then
screensaver.visible:=true;
end;
И поставил общий обработчик событий на все объекты:
procedure TForm1.backMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
screentime:=0;
screensaver.visible:=false;
end;
В итоге скринсэйвер вообще не запускается по причине того что обработчик срабатывает постоянно когда мышь находится на объекте, как реализовать что-бы обработчик запускался при конкретно движении мыши?
tq (2005-11-18 17:34:00) [1]Точно..спасибо.
Джо (2005-11-18 17:31:00) [2]
> а где брать координаты мыши?
Наверное, в параметрах метода-обработчика, не так ли?
tq (2005-11-18 17:30:00) [3]Вытекает другой вопрос: а где брать координаты мыши?
Leonid Troyanovsky (2005-11-18 17:13:00) [4]
> tq (18.11.05 17:09)
> на объекте, как реализовать что-бы обработчик запускался
> при конкретно движении мыши?
Скажем, запомнинать координаты мыши.
И вызывать обработчик, если оные изменились.
--
Regards, LVT.
| |
