Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.28;
Скачать: CL | DM;

Вниз

Ожидание в Delphi   Найти похожие ветки 

 
Kedis ©   (2003-04-17 12:29) [0]

Одним словом надо сделать так чтобы, если человек отошел от компьютера, и после 5 минут моя прога закрывалась сама


 
Михайлов Антон ©   (2003-04-17 12:41) [1]

А как ты хочешь проверять отошёл он или нет?
Можно по позиции мышки... если в течение 5 менут позиция не изменилась, то закрываем прогу...
В общем для таймера интервал=1000


procedure TForm1.Timer1Timer(Sender: TObject);
begin
if (x=mouse.CursorPos.X)and(y=mouse.CursorPos.Y)then
count:=count+1
else
count:=0;

if count>5*60 then
close;

x:=mouse.CursorPos.X;
y:=mouse.CursorPos.Y;
end;

=============================================
Незнаю на сколько всё рабочее... это я писал для медиаплеера, чтобы курсор мыши исчезал после 3х секунд... переделывал на ходу...
Не забудь описать x,y,count:integer


 
Skier ©   (2003-04-17 12:44) [2]

TApplication.OnIdle + TTimer


 
Silver_ ©   (2003-04-17 14:39) [3]


> Skier © (17.04.03 12:44)


+

Есть такое ApplicationEvents а тама свойство OnIdle вот тама и делай усе че нада.


 
Mike Kouzmine ©   (2003-04-17 14:56) [4]

А если пользователь задумался или по телефону говорит?
Нужна видеокамера (лучше три) и модуль распознавания объектов.



Страницы: 1 вся ветка

Текущий архив: 2003.04.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
3-91221
Jao
2003-04-10 08:45
2003.04.28
День добрый. Комментарии в SQL-запросе при конекте через ADO


4-91589
Darkman
2003-03-02 16:41
2003.04.28
Определение вида (topmost или нет) окна по handle


1-91359
dimonf
2003-04-15 18:06
2003.04.28
Подскажите как сделать редактор свойств для своего компанента?


14-91534
Дмитрий К.К.
2003-04-11 07:27
2003.04.28
Именинники 11 апреля


11-91242
tanddt
2002-07-23 15:33
2003.04.28
RunTime генерация кнопок