Текущий архив: 2005.12.04;
Скачать: CL | DM;
Вниз
Screensaver Найти похожие ветки
← →
tq (2005-11-18 17:09) [0]Я кинул таймер:
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;
В итоге скринсэйвер вообще не запускается по причине того что обработчик срабатывает постоянно когда мышь находится на объекте, как реализовать что-бы обработчик запускался при конкретно движении мыши?
← →
Leonid Troyanovsky © (2005-11-18 17:13) [1]
> tq (18.11.05 17:09)
> на объекте, как реализовать что-бы обработчик запускался
> при конкретно движении мыши?
Скажем, запомнинать координаты мыши.
И вызывать обработчик, если оные изменились.
--
Regards, LVT.
← →
tq (2005-11-18 17:30) [2]Вытекает другой вопрос: а где брать координаты мыши?
← →
Джо © (2005-11-18 17:31) [3]
> а где брать координаты мыши?
Наверное, в параметрах метода-обработчика, не так ли?
← →
tq (2005-11-18 17:34) [4]Точно..спасибо.
Страницы: 1 вся ветка
Текущий архив: 2005.12.04;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.027 c
