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

 READEXIT()
 Toggle Up arrow and Down arrow as READ exit keys
------------------------------------------------------------------------------
 Syntax

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

 Arguments

     <lToggle> toggles the use of Up arrow and Down arrow 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
     Up arrow and Down arrow 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, Up arrow and Down arrow are either enabled or
     disabled as READ exit keys.  At program startup, Up arrow and Down arrow
     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 Up arrow and Down arrow
        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.