How to check program is not use for specific time?

[dutch]

I would like to close program or log off for specific time if the user does not use.

I guess the oTimer() will be used but how can I do that?

Regards,
Dutch

[James Bott]

The key is that we need to detect keystrokes and mouse moves and clicks. You would need to reset the timer after each keystroke and mouse move or click. I don't know how to do this.

James

[dutch]

Dear James,

Thanks for your idea. I have another point, if can we detect screen saver is lActive? If so, we can check from that point.

Regards,
Dutch

[Antonio Linares]

Dutch,

You can modify this screensaver example in FWH:
viewtopic.php?p=88848#p88848

[Jack]

I have the same question and solved it this way :

EACH TIME I ENTER IN A MENU,A BROWSE , A DIALOG , I CALL the CheckT procedure with 1 as parameteers, it reset the counter to 1 CheckT(1)





DEFINE WINDOW oWnd FROM 0,0 TO 29,78
MENU BuildMenu()
SET MESSAGE OF oWnd ;
TO "Timer ;
CENTERED DATE KEYBOARD

DEFINE TIMER oTmr INTERVAL 10000 ACTION CheckT() OF oWnd
ACTIVATE TIMER oTmr

ACTIVATE WINDOW oWnd MAXIMIZED
*


* ===
procedure CheckT(pr)
LOCAL hWnd,wjacfo,vdxx
static cteur:=1
if pr=NIL
cteur:=cteur+1
oWnd:SetMsg("Value TimeOut :"+str(cteur,10)+" ")
else
cteur:=pr && reset
endif
*
if cteur > 300 && This will stop the application
cteur:=1
oTmr:end()
close databases
set resources to
cteur:=1
*
oWnd:end()
quit
endif
*
RETURN

[dutch]

I have more than 100 dialogs. How does it works? It is not possible to put timer in every dialog.

Regards,
Dutch

[Daniel Garcia-Gil]

Hello Dutch...

you can modify window class and implement James idea in window class, use a CLASSDATA to keystrokes and use one main timer, this way you dont need modify your code