Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

помогите: надо выполнить действие, если мышь не двигалась минуту [D4, D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]


com6 ©   (2002-04-28 17:02:00) 

надо выполнить действие, если мышь не двигалась минуту. вот как определеить, что мышь не двигалась минуту??? =)

заранее благодарен.


Malder   (2002-04-28 22:19:00) [1]

Запускаешь таймер с интервалом в секунду.
Должны быть две глобальные переменные, в одной храняться координаты мыши (CurPos), в другой пройденное время (TimeLeft). Соответственно, при каждом OnTimer TimeLeft увеличивается на 1, а GetCursorPos сравнивается с CurPos - если равны и TimeLeft больше 60, то выполняется действие. А если не равны, то время опять устанавливается на ноль...


Song   (2002-04-28 22:00:00) [2]

Запускаете таймер на минуту, пока не заончится время крутите в цикле GetCursorPos()


Наверх

Титульная страница Поиск, карта сайта Написать письмо