Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Screen Timer
Message
From
27/05/1998 14:42:04
 
 
To
27/05/1998 14:33:13
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00102459
Message ID:
00102467
Views:
36
>I am looking for a way to make my application timeout if the user is not doing anything.
>
>Kind of like the way the old READ TIMEOUT used to work.
>
>Has anyone done this?
>
>Trish

You have to implement two things:
1. Add _SCREEN.Timer object with code in Timer event to reset a flag:
*** Timer.Timer event
if oApp.quitflag=.f.
 oApp.quitflag=.t.
else
 do quitapp   && system procedure to close application (destroy all forms,etc)
endif
return
2. Timer will fire this code e.g. every 10 minutes and you should add to various places if your application (e.g Form.MouseMove events) following line:
oApp.quitflag=.f.
Edward Pikman
Independent Consultant
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform