Mike, 

 My apologies.... after reading your original post again, I see that I may have 
misunderstood. 

You stated that you have a "timer form" that does a count down, not that you 
are using 

the TIMER function of a form.  Is this the case?   If so, you probably can 
solve your issue and 

actually have a better process by using the TIMER function.    I have found 
this function 

to be of great benefit and use it in several applications.   



Sorry for the confusion if this is the case.  My processes that I confirmed are 
not affected 

by the screen saver  are using the TIMER EEP function.  (If you want to discuss 
the TIMER 

function, I may be able to give some input on it) 



-Bob 






----- Original Message ----- 
From: "Ramsour Mike" <[email protected]> 
To: "RBASE-L Mailing List" <[email protected]> 
Sent: Wednesday, July 22, 2009 9:34:19 AM GMT -06:00 US/Canada Central 
Subject: [RBASE-L] - Form timer issue 




Good morning: 



I created a timer form that does a countdown.  Once a given amount of time 
passes the calling program closes the form and continues on its merry way. 



The form works exactly as intended except that if the computer is in screen 
saver mode the program stays paused until I log back into the R:BASE session. 



Here's the code that runs the form: 



SET VAR VDB TEXT = ( CVAL ( 'DATABASE' )) 
IF VDB <> 'ZANEDATA' AND # TIME BETWEEN '06:00:00' AND '06:10:00' THEN 
  CLEAR VAR V % TIME , VSECS , VDISPLAY 
  SET VAR VCRNT_TIME TIME = .# TIME 
  SET VAR VTRGT_TIME TIME = ( RTIME ( 6 , 10 , 0 )) 
  SET VAR VSECS INTEGER = (. VTRGT_TIME - . VCRNT_TIME ) 
  SET VAR VDISPLAY INTEGER = . VSECS 
  EDIT USING COUNTDOWN 
  CLEAR VAR V % TIME , VSECS , VDISPLAY , VDB 
ENDIF 



And here's the EEP in the form: 



WHILE #TIME < . VTRGT_TIME THEN 
  SET VAR VSECS INTEGER = (. VTRGT_TIME - .#TIME) 
  SET VAR VDISPLAY INTEGER = . VSECS 
  RECALC VARIABLES 
  SKIP TO VDISPLAY 
ENDWHILE 
CLOSEWINDOW 
RETURN 



Is there some way around the screen saver issue or have I done something wrong? 



As always any assistance is greatly appreciated. 



Thanks - Mike Ramsour 



Confidentiality Notice This message is intended exclusively for the individual 
or entity to which it is addressed and may contain privileged, proprietary, or 
otherwise private information. If you are not the named addressee, you are not 
authorized to read, print, retain, copy or disseminate this message or any part 
of it. If you have received this message in error, please notify the sender 
immediately by e-mail and delete all copies of the message.

Reply via email to