_rstold.utl Utility - Restore Old Keymap

Syntax

call "_rstold.utl"

Description

The _rstold.utl utility restores the keymap that was in use before the keyboard configuration program _lkeymap.utl was called.

The message window is DROPed, and the value of the global string (!OLD_EDIT) is retrieved and set as the new value of the global string (!EDIT). The values of the global strings (!OLD_FKEYS) and (!OLD_EKEYS) are used to reload the function keys and edit keys, respectively.

Note:

The global strings (!OLD_EDIT), (!OLD_FKEYS), and (!OLD_EKEYS) are created by the utility _lkeymap.utl.

Example

LET BBEXT$=STBL("BBEXT")
REM "Initialize Toolkit
CALL "_acu.utl"
REM "Initialize Keymap
CALL BBEXT$+"_lkeymap.utl"
REM "Do some Toolkit Input
DIM INPUT$:STBL("!INPUT.TPL")
REM "Set input values ..
LET INPUT.COL=10,
INPUT.ROW=5,
INPUT.COLS=8,
INPUT.LENGTH=8
CALL BBEXT$+"_ninput.utl",input$,val$,ctlval
REM "Return to 'normal processing
REM "Restore prior keymap
CALL BBEXT$+"_rstold.utl"
REM "Return to application
RUN "myprog"

See Also

Alphabetical EUS Utilities

Functional Listing of EUS Utilities

_cleanup.utl

_rsteus.utl

_lkeymap.utl