Since the popup is basically a READ MODAL at the time the line ON SELECTION POPUP is executed, and there is no timeout clause for that command, I can't see of any way to do it. But I've been wrong before.
try the @ get and read version of using popups
the only problem is you have to remember to clear the lines
on the screen that the popup occupied.
an example follows:
CLEAR
SET TALK OFF
DEFINE POPUP TESTING FROM 10,10 TITLE 'TESTING THIS POPUP'
DEFINE BAR 1 OF TESTING PROMPT 'One'
DEFINE BAR 2 OF TESTING PROMPT 'Two'
DEFINE BAR 3 OF TESTING PROMPT 'Three'
DEFINE BAR 4 OF TESTING PROMPT 'Four'
DEFINE BAR 5 OF TESTING PROMPT 'Five'
DEFINE BAR 6 OF TESTING PROMPT 'Six'
WKEY=2
@ 10,10 GET WKEY POPUP TESTING
READ TIMEOUT 10
@ 10,10 CLEA TO 10+CNTBAR('TESTING')+1,78
@ 20,10 SAY BAR()
@ 21,10 SAY WKEY
@ 22,10 SAY PRMBAR('TESTING',WKEY)
RELEASE POPUP TESTING
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.