| QTIPS - DOSTime |
| VERBatim - V11 |
| @ATTACK - @Backgrnd.Time |
| @ATTACK - @Index.Time |
| QTIPS - Time-outs in Windows |
| QTIPS - Toggling Bell |
| @ATTACK - @Environ.Set |
| @ATTACK - @Environ.Keys |
| @ATTACK - @Help.Level |
| @ATTACK - @TCL.Stack |
| Reader's Clinic - ReEnable TCL from Debugger |
| QTIPS - Time-outs in Windows |
| Menus and Menu Drivers |
| Caching in on the Frames Array - Mike Pope |
| What's New (and un(der)documented!) In 2.12 |
| QTIPS - Using @Upper.Case and @Lower.Case with Foreign Languages |
| @ATTACK - @Lower.Case |
| @ATTACK - @Upper.Case |
| Sorting out Collation Sequences by Mike Pope |
RevMedia FKB
| Document | V4I2A1 |
| Title | QTIPS - Time-outs in Windows |
| Keywords | @ENVIRON.SET TIME-OUTS @INDEX.TIME |
| Text | Serge Ciregna of Informataix recently asked if it was possible to display a window WITH an option for the user to take an action based on the window and if no action had been taken in a fixed period of time to automatically exit the window and return to the menu The easiest way of achieving this is by modifying background indexing parameters on the fly to use a replacement index routine and use the fact that this routine will be called AFTER an elapsed amount of seconds to force the window to close AFTER this time E G Save = @Environ Set @Index Time = 5 ; * Set to the time to elapse /* Add two escapes into the data buffer (in case there is a "Changes Will Be Lost" message") */ @Environ Set<77> = "C" @Environ Set<78> = "@DATA=CHAR(27):CHAR(27)" call catalyst("W" "TEST") * Restore parameters Transfer Save to @Environ Set @Index Time = 30 * And finally gobble up extra Esc if there Input X 1 If X = Char(27) Else @Data[1 0] = X (Volume 4 Issue 2 Page 4) |
Page last modified: 31/01/03