Отслеживание активности

Форумы Помощь по пакетуОтслеживание активности ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 24

Рейтинг: 1

#1: 2012-03-08 14:31:39 ЛС | профиль | цитата

Здравствуйте.

Возникла необходимость отслеживать активность пользователя - если он не шевелил мышкойне тыкал в клавиатуру (глобально, не только в окне) больше минуты - делать то-то, то-то.

Нашел компонент UserActive, но он позволяет отслеживать не больше тридцати секунд.

Можно ли мне как-то помочь? Времени до воскресенья

карма: 0

Разработчик

Ответов: 4698

Рейтинг: 426

#2: 2012-03-08 14:45:04 ЛС | профиль | цитата

KeyHook
Или связка:
Keyboard + Timer

карма: 10

Мой сайт, Мои рассказы

Голосовали:

901

Ответов: 24

Рейтинг: 1

#3: 2012-03-08 14:50:57 ЛС | профиль | цитата

1. KeyHook палится антивирусами, даже есть программа хорошая.
2. Кейборд может прочитать состояние только одной клавиши.
3. UserActive заработал как надо... Глючный он какой-то.

Спасибо и на этом

карма: 0

Разработчик

Ответов: 4698

Рейтинг: 426

#4: 2012-03-08 14:52:06 ЛС | профиль | цитата

901 писал(а):

2. Кейборд может прочитать состояние только одной клавиши.

Серьезно?

Keyboard wiki писал(а):

Keys - Содержит массив из 256 элементов для всех клавиш. Если элемент массива равен 1, то соответствующая ему клавиша нажата, если 0 - отпущена

карма: 10

Мой сайт, Мои рассказы

Ответов: 24

Рейтинг: 1

#5: 2012-03-08 15:03:23 ЛС | профиль | цитата

Упс, опять не знал

Спасибо

карма: 0

Ответов: 1946

Рейтинг: 174

#6: 2012-03-08 18:39:02 ЛС | профиль | цитата

901 писал(а):

Нашел компонент UserActive, но он позволяет отслеживать не больше тридцати секунд.

Неправда.

code_27105.txt

У меня отлично работает и более 30 секунд.

карма: 10

Учебник по HiAsm | Видеоуроки | Мои программы

файлы: 1

code_27105.txt [197B] [243]

Ответов: 24

Рейтинг: 1

#7: 2012-03-10 15:14:08 ЛС | профиль | цитата

Гм-гм.

901 писал(а):

3. UserActive заработал как надо... Глючный он какой-то.

карма: 0

Ответов: 258

Рейтинг: 2

#8: 2012-03-12 16:12:03 ЛС | профиль | цитата

А где собственно этот компонент "UserActive" взять?

карма: 0

Ответов: 1376

Рейтинг: 198

#9: 2012-03-12 16:44:50 ЛС | профиль | цитата

И без "UserActive" можно справиться, вполне работает...

Assasin писал(а):

Или связка:
Keyboard + Timer


Add(MainForm,2953706,420,231)
{
 Visible=1
 Caption="Wait"
 Point(Handle)
 Point(onMouseWheel)
 link(onCreate,6495413:doPopup,[(468,251)(468,244)])
 link(onMouseWheel,940962:doWork1,[(466,258)])
}
Add(MouseEvent,13295081,357,231)
{
}
Add(Timer,6993187,315,273)
{
 link(onTimer,1003156:doData,[])
}
Add(ChangeMon,1003156,357,273)
{
 Point(onNoData)
 link(onData,940962:doWork2,[])
 link(Data,13295081:MouseX,[])
 link(onNoData,9716726:doNext,[(401,286)(401,307)])
}
Add(MultiElement,96426,357,308)
{
 @Hint=#30:Перехват клавиш и кнопок мышки|
 link(onEvent1,7880297:doWork2,[])
}
BEGIN_SDK
  Add(EditMulti,77305,3,3)
  {
   EventCount=1
   Width=209
   Height=116
  }
  Add(Keyboard,25118,63,21)
  {
  }
  Add(IndexToChanel,5374436,105,63)
  {
   Point(Data)
   link(onEvent2,11029009:doData,[(145,76)(145,69)])
   link(Data,16216493:Index,[(111,13)(13,13)(13,107)(76,107)])
  }
  Add(ArrayEnum,16216493,63,63)
  {
   link(onItem,5374436:doEvent,[])
   link(Array,25118:Keys,[])
  }
  Add(MMTimer,9080574,21,63)
  {
   Interval=10
   link(onTimer,16216493:doEnum,[])
  }
  Add(ChangeMon,11029009,154,63)
  {
   link(onData,77305:onEvent1,[(200,69)(200,9)])
  }
END_SDK
Add(HubEx,7880297,397,308)
{
 link(onEvent,9716726:doReset,[])
}
Add(Message,13009676,504,308)
{
 Message="Система простаивает более 10 сек.
  В о з м у т и т е л ь н о ! ! !
9Вы живы?
  Если живы, то дотянитесь до
9 ОК"
 Caption="Внимание"
 Icon=3
}
Add(Hub,2489256,469,308)
{
 link(onEvent1,13009676:doMessage,[])
 link(onEvent2,1851757:doWork1,[(495,321)])
}
Add(CounterEx,9716726,420,301)
{
 Max=9
 Point(doReset)
 Point(onThroughMax)
 link(onThroughMax,2489256:doEvent1,[])
}
Add(WinTools,6495413,483,231)
{
 link(Handle,2953706:Handle,[(489,215)(409,215)(409,274)(426,274)])
}
Add(HubEx,1851757,491,343)
{
 Angle=2
 link(onEvent,7880297:doWork3,[(401,349)])
}
Add(HubEx,940962,462,273)
{
 link(onEvent,1851757:doWork2,[(545,279)(545,349)])
}