5.


5. - 583


aOldKey := SAVESETKEY() //
// SET KEY
aOldGet := SAVEGETS() // GET-
SET KEY 28 TO HELP2 // <F1>
cHelp1 := SPACE(10) // GET-,
cHelp2 := SPACE(10) // , HELP
@ 10, 10 GET cFirstname
@ 11, 10 GET cLastname
READ
RESTGETS(aOldGet) // GET
RESTSETKEY(aOldKey) // .T.
//
WCLOSE() //
RETURN
 
PROCEDURE HELP2 (A, B, C) // HELP
* , ..
RETURN
 


See Also: RESTGETS()
SAVEGETS()
SAVESETKEY()

 


 


SAVEGETS()
GET-.
------------------------------------------------------------------------------
 

 
SAVEGETS() --> aSavedGets
 

 
aSavedGets - , ,
GET-.
 

 

GET-,
RESTGETS().
 

 
. ! SAVEGETS()/RESTGETS()
Clipper- CLEAR CLEAR GETS.
 
. , SAVEGETS()
SAVESETKEY(), (- )
,
.
 
. Clipper 5.0,