FoxPro/Visual FoxPro - Problema con comando On Key Label

   
Vista:

Problema con comando On Key Label

Publicado por Gabriel (406 intervenciones) el 19/05/2011 15:56:46
Amigos :

Les comento segun el HELP de VFP el Comando PUSH KEY CLEAR Coloca
todos los valores actuales del comando ON KEY LABEL en una pila en la
memoria.

Hasta ahi todo perfecto como decidi utilizar la Tecla de Funcion F5
para llamar al formulario de BUSQUEDA. Lo que deseo hacer ahora es que
solo
funcione dicha tecla de funcion cuando llegue al Campo TxtDescripcion
y cuando este en otro campo o en otro proceso del formulario no se
active el llamado a otro formulario.

El siguiente codigo se activa cuando se presiona la tecla de funcion
F5 en cualquier otro campo

Ej.- message1 = "Tecla de Funcion [ F5 ] Desactivada Momentanemente."
ON KEY LABEL F5 WAIT WINDOW message1

Bueno con el comando que les menciono funciona correctamente pero
cuando quiero utilizar la tecla F5 dentro del campo Txt descripcion no
logro activar el otro formulario de BUSQUEDA a pesar que indico el
comando POP KEY

Que puede faltar para que funcione correctamente .

Espero sus comentarios.

Saludos,
GABRIEL
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Problema con comando On Key Label

Publicado por Javier (265 intervenciones) el 19/05/2011 20:11:30
Hola:
Me parece que podrías escribir :
* Obj: txtDescripcion * Evento: GotFocus

ON KEY LABEL F5 Busqueda()

y en:

* Obj: txtDescripcion * Evento: LostFocus
ON KEY LABEL F5

De esta manera cuando txtDescripcion "tome" el foco, se definirá F5 para la búsqueda y cuando ese texto "pierda" el foco se desactivará la F5...

Espero que te sirva...

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Mauricio

Problema con comando On Key Label

Publicado por Mauricio (1368 intervenciones) el 19/05/2011 23:14:35
En el init del campo TxtDescripcion, escribe:
ON KEY LABEL F5 DO Busqueda
*
*
En el Destroy del campo TxtDescripcion, escribe
ON KEY LABEL F5 ON KEY
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Corrección - Problema con comando On Key Label

Publicado por Javier (265 intervenciones) el 19/05/2011 20:28:20
en:

* Obj: txtDescripcion * Evento: LostFocus

ON KEY LABEL F5 WAIT WINDOW "Tecla de Funcion [ F5 ] Desactivada...."

y pa completar en el init de tu form escribe lo mismo, o sea:

ON KEY LABEL F5 WAIT WINDOW "Tecla de Funcion [ F5 ] Desactivada...."

O sea que arrancas con la tecla "desactivada" y solo se va a "activar" cuando llegue a txtDescripcion

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Corrección - Problema con comando On Key Label

Publicado por Gabriel (406 intervenciones) el 19/05/2011 21:27:07
Gracias amigos por sus sugerencias...

Resolvi el problema...

atte.,

Gabriel
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar