Clipper/FiveWin - Castor

- Para todos los que saben,, como puedo controlar el uso del ESC para que no me saque de la ventana de dialogo al pulsar ESC.

- Por otro lado como le puedo hacer para que cuando pulse ESC en un campo (menos en el primero ) se pase al primer campo de captura (como en Clipper)

Andrés:

Ventana y diálogo son dos cosas diferentes, pero lo puedes controlar al momento de activar el diálogo así:

ACTIVATE DIALOG oDlg NOWAIT CENTERED VALID ! GetAsyncKey(VK_ESCAPE)

El Duro

Gracias por tu apoyo en cuanto al pulsar la tecla ESC y no salirse del Dialogo; en cuanto a la otra pregunta quise decir que en el mismo caja de dialogo si pulso ESC o INTRO estando en un campo que no sea el primero ; quiero que se pase el control al primer campo de captura (al primer ID) ; estoy utilizando el Workshop

Agradecere tu respuesta.

Castor

Castor, para el control de la tecla ESC en los usos de GET prueba esto:

define dialog ...
redefine get oacod var codigo id ... of...
redefine ...
redefine get oget var nombre id ... of ...
oget:bkeydown := {|nKey| iif(nKey==27, oacod:setfocus(),)}
activate dialog...
_________________
y listo el pollo!!

Un saludo. LORENZO

Lorenzo jalo perfectamente,, oye como puedo controlar lo siguiente:

En una caja de dialogo tengo un :

define dialog ...
redefine get oCan var nCan id ... of...
redefine .....
redefine get oAcod var codigo id ... of...
redefine get oGet var nombre id ... of ...

Al dar el INTRO en el control de oAcod no quiero que se pase el cursor al control de oGet si no a otro CONTROL osea a oCan

Utilizo :
oAcod:bkeydown := {|nKey| iif(nKey==13, oCan:setfocus(),)}

Y no me funciona !

Castor

Hola. prueba con esto
oAcod:oJump := oCan
espero te sirva.
J. Vargas