отошел от компа

[Blood_Magic]

мне нужно узнать, сколько не работает пользователь за компом и от этого сделать разные состояния, как в icq. как это можно сделать?

[Duncon]

Я видел где-то реализацию сего поищи..

[Blood_Magic]

хороший ответ

[Dr_Grizzly]

Врубай таймер, допустим на 5 минут, во время включения запомни позицию мышки, если она изменилась, таймер начинает отсчитывать по новой Чаго тут сложного? Как взять позицию мышки?

//Вне процедуры!
Type Tpoint = record
x:integer;
y:integer;
end;

Потом объявляете саму переменную :
Var
Pos: TPoint;
begin;
GetCursorPos(pos);
x:=pos.x;
y:=pos.y;
end;

[Dr_Grizzly]

А вот еще фишка, создай таймер и с интервалом 1 сек или меньше, отлавливай нажатие клавиш, здесь используется код клавиши, например кнопка "A" имеет код 65.

if getasynckeystate(65)<>0 then showmessage('A - pressed');

[Blood_Magic]

а может глобальным хуком

[Duncon]

Не есть глобальная переменная которая следит за простоем компа можно ее считывать и не париться..

[Blood_Magic]

какая?

[YurikGL]

Не есть глобальная переменная которая следит за простоем компа можно ее считывать и не париться..

Кнопка на стуле у пользователя?
На самом деле пользователь может отойти, оставив запущенным процесс сканирования антивирусом или дефрагментации диска. Компутер что-то делает а пользователь отошел и "ICQ надо оключить".
С другой стороны, пользователь может сидеть и смотреть фильм. Он ничего не делает, компьютер не сильно загружен, но пользователь перед компьютером и "icq отключать не надо".
Так что идеального решения не существует. Если только датчик движения, завязанный на COM-порт.

[Blood_Magic]

мне достаточно что бы клаву и мышь не трогали