Pregunta sobre el uso de las teclas de funcion f1-f12

[Enrique Martinez Regalado]

Hola mi pregunta es la siguiente:

 

uso las teclas de funcion en un formulario y desde ese formulario activo la tecla de funcion f3 con el siguiente codigo, on key label f3 do form frmbuscar, todo bien funciona si presiono una sola vez la tecla f3 y me muestra el formulario frmbuscar, pero si presiono mas de una vez la tecla f3 me encima el formulario frmbuscar varias veces, hay alguna manera de evitar la repeticion en este caso.

 

De antemano les agradezco mucho su ayuda como siempre muchas gracias

 

Enrique Martinez Regalado

Puerto Vallarta, Jalisco México

[Robert Martínez]

Saludos,

Te recomiendo el uso del evento  keypress  a nivel del formulario de la siguiente manera:

*** Esto lo coloca en el evento KeyPress del formulario.
LPARAMETERS nKeyCode, nShiftAltCtrl

IF nkeycode = -2 &&F3
    DO FORM frmbuscar
    nodefault
ENDIF


También te recomiendo que ponga la propiedad KeyPreview del formulario a .T.
THISFORM.KeyPreview = .T. && Esto lo puede poner en el INIT el formulario o simplemente puedes cambiar la propiedad en tiempo de diseño.

[Enrique Martinez]

Robert Muchas gracias me funcionó muy bien, te agradezco mucho tu ayuda.

Saludos

Enrique Martinez

El día 10 de febrero de 2013 22:46, Robert Martínez
<soluci...@gmail.com> escribió:

[Jose Mario]

el problema no esta en F3, esta en que te habre el formulario varias veces

coloca esto en load del formulario

IF WEXIST( [nombredetuformulario.scx] )    && asi no abre mas de una vez

 RETURN

ENDIF

pero ademas es mejor colocarlo en keypress del formulario

otra cosa hay otra propiedad llamada keypreview

debes de colocar .t.

para que te funcione keypress

[Enrique Martinez]

Muchas gracias José Mario, te agradezco tu sugerencia.

Saludos

Enrique Martinez