Click above to get retro games delivered to your door ever month!

 READEXIT()
 Toggle Uparrow and Dnarrow as READ exit keys
------------------------------------------------------------------------------
 Syntax

     READEXIT([<lToggle>]) --> lCurrentState

 Arguments

     <lToggle> toggles the use of Uparrow and Dnarrow as READ exit keys.
     Specifying true (.T.) enables them as exit keys, and false (.F.)
     disables them.

 Returns

     READEXIT() returns the current setting as a logical value.

 Description

     READEXIT() is an environment function that reports the current state of
     Uparrow and Dnarrow as keys the user can press to exit a READ from the
     first or last Get object in a GetList.  If the optional <lToggle>
     argument is specified, Uparrow and Dnarrow are either enabled or
     disabled as READ exit keys.  At program startup, Uparrow and Dnarrow are
     not enabled as READ exit keys.  Normally, READ exit keys include only
     PgUp, PgDn, Esc, or Return from the last GET.

 Examples

     .  This example shows READEXIT() enabling Uparrow and Dnarrow
        exit keys before a READ then resetting them after the READ
        terminates:

        cMyvar = SPACE(10)
        lLastExit = READEXIT(.T.)   // Result: Turn on exit keys
        //
        @ 10, 10 SAY "Enter: " GET cMyvar
        READ
        READEXIT(lLastExit)         // Result: Restore previous setting

 Files:  Library is CLIPPER.LIB.