To All,
Here I am again with a beginners problem with Clipper 5.2.
I want to use the WHEN prevalidation. I want that a get is only entered when 
the the previous get was left with the key . I tried this in the 
following way, but that does not work. What is the solution?
#include "inkey.ch"
setkey( K_CTRL_ENTER, { || CtrlEnter() } )
cA := space( 10 )
cB := space( 10 )
cC := space( 10 )
while lastkey() != K_ESC
   @ 10, 10 say 'A' get cA
   @ 12, 10 say 'B' get cB when lastkey() ==  K_CTRL_ENTER
   @ 14, 10 say 'C' get cC
   read
enddo
return
procedure CtrlEnter()
   keyboard chr( K_ENTER )
   keyboard chr( K_CTRL_ENTER )
   return
Stumbling on the clipper-road, I have so many questions, but I will ask them 
one by one.
Greetings,
   Joop Buker
--- FMail 1.02
---------------