How Do I Insert a timer to a menu?

[mzabary]

** this is my menu...TIMER PLEASE !!!
i=0
DO WHILE i=0
i=INKEY()
@ 21,49 SAY ""
IF UPPER(CHR(i))$"0123456XZ"
EXIT
ENDIF
i=0
ENDDO
** THANKS

 

[dgrewe]

Add a value to inkey
=inkey(10)
This make inkey wait for 10 seconds then presses on with the program.
David W. Grewe
Dave@internationalbid.com

 

[mzabary]

Hi David and thank you for the help.

Do I have to replace the statment i=INKEY()
with i=INKEY(10) to make the program wait 10 sec. ?

it might sound stupid to ask for example to wait 10 minutes
replace the 10 with 600?

Thanks again
Mike Zabary.

 

[Eguy]

Hi Mike;


Yes, INKEY(600) will wait 10 minutes. INKEY(0) will wait forever.

Ed


Please let me know if the sugestion(s) I provide are helpful to you.
Sometimes you're the windshield... Sometimes you're the bug.

 

[mzabary]

Hi Ed.
I am looking to have this menu on the screen for 10 minutes
and if there is no respons from a user I want the program to quit.
I am sure I was not clear with my need. sorry.
Thanks

 

[DSummZZZ]

If this menu is a screen, look into the READ TIMOUT clause. You can use the i = INKEY(600) statement and if i equals 0, no key was pressed.

Dave S.

 

[vmarkandeya]

Hi ,

I have installed an application developed in foxpro for windows 2.6, I am running this in Windows NT Workstation.When i try using the same application in multiple machines, i get 'File Read Error'. Can u pls help me how to debug this.

Rgds/Mark

 

[vmarkandeya]

Hi ,

I have installed an application developed in foxpro for windows 2.6, I am running this in Windows NT Workstation.When i try using the same application in multiple machines, i get 'File Read Error'. Can u pls help me how to debug this.

vmarkandeya@rediffmail.com

Rgds/Mark