teclas funcion
958 views
Skip to first unread message
Jhonny Zambrana
Sep 29, 2011, 11:47:15 PM9/29/11
to Comunidad de Visual Foxpro en Español
Otra, comopuedo asignar las teclas de funcion a lo que seria click con
el boton en un command buton
Gracias mil de antemano.
el boton en un command buton
Gracias mil de antemano.
Walter R. Ojeda Valiente
Sep 30, 2011, 12:40:19 AM9/30/11
to publice...@googlegroups.com
Para asignar las teclas de función (o cualquier otra tecla), puedes usar el comando ON KEY LABEL.
Por ejemplo:
ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
Saludos.
Walter.
Por ejemplo:
ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
Saludos.
Walter.
> Date: Thu, 29 Sep 2011 20:47:15 -0700
> Subject: [vfp] teclas funcion
> From: jhonny....@gmail.com
> To: publice...@googlegroups.com
> Subject: [vfp] teclas funcion
> From: jhonny....@gmail.com
> To: publice...@googlegroups.com
Jhonny Zambrana
Sep 30, 2011, 12:41:46 AM9/30/11
to Comunidad de Visual Foxpro en Español
Gracias Walter.
On 30 sep, 00:40, "Walter R. Ojeda Valiente" <w...@hotmail.com> wrote:
> Para asignar las teclas de función (o cualquier otra tecla), puedes usar el comando ON KEY LABEL.
>
> Por ejemplo:
>
> ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
>
> Saludos.
>
> Walter.
>
>
>
> > Date: Thu, 29 Sep 2011 20:47:15 -0700
> > Subject: [vfp] teclas funcion
> > From: jhonny.zambr...@gmail.com
>
> - Mostrar texto de la cita -
On 30 sep, 00:40, "Walter R. Ojeda Valiente" <w...@hotmail.com> wrote:
> Para asignar las teclas de función (o cualquier otra tecla), puedes usar el comando ON KEY LABEL.
>
> Por ejemplo:
>
> ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
>
> Saludos.
>
> Walter.
>
>
>
> > Date: Thu, 29 Sep 2011 20:47:15 -0700
> > Subject: [vfp] teclas funcion
> > To: publice...@googlegroups.com
>
> > Otra, comopuedo asignar las teclas de funcion a lo que seria click con
> > el boton en un command buton
>
> > Gracias mil de antemano.- Ocultar texto de la cita -
>
> > Otra, comopuedo asignar las teclas de funcion a lo que seria click con
> > el boton en un command buton
>
>
> - Mostrar texto de la cita -
Jhonny Zambrana
Sep 30, 2011, 12:51:31 AM9/30/11
to Comunidad de Visual Foxpro en Español
Hola me dice que " thisform. can only be used,,,"
alguna otra sugerencia????
alguna otra sugerencia????
> Para asignar las teclas de función (o cualquier otra tecla), puedes usar el comando ON KEY LABEL.
>
> Por ejemplo:
>
> ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
>
> Saludos.
>
> Walter.
>
>
>
> > Date: Thu, 29 Sep 2011 20:47:15 -0700
> > Subject: [vfp] teclas funcion
> > From: jhonny.zambr...@gmail.com
>
> Por ejemplo:
>
> ON KEY LABEL F2 ThisForm.BotonGrabar.CLICK()
>
> Saludos.
>
> Walter.
>
>
>
> > Date: Thu, 29 Sep 2011 20:47:15 -0700
> > Subject: [vfp] teclas funcion
> > To: publice...@googlegroups.com
>
> > Otra, comopuedo asignar las teclas de funcion a lo que seria click con
> > el boton en un command buton
>
>
> > Otra, comopuedo asignar las teclas de funcion a lo que seria click con
> > el boton en un command buton
>
Marcelo Barberis
Sep 30, 2011, 1:07:47 AM9/30/11
to publice...@googlegroups.com
Bueno yo lo hice de esta manera
En un formulario en el evento Activate puse esto:
ON KEY LABEL F2 KEYBOARD '{ALT+P}'
ON KEY LABEL F4 KEYBOARD '{ALT+B}'
ON KEY LABEL F5 KEYBOARD '{ALT+L}'
ON KEY LABEL F6 KEYBOARD '{ALT+I}'
ON KEY LABEL F7 KEYBOARD '{ALT+C}'
ON KEY LABEL F8 KEYBOARD '{ALT+M}'
ON KEY LABEL F9 KEYBOARD '{ALT+S}'
ON KEY LABEL F12 KEYBOARD '{ALT+G}'
y en el evento Deactivate puse esto:
ON KEY LABEL F2 WUT = ' '
ON KEY LABEL F4 WUT = ' '
ON KEY LABEL F5 WUT = ' '
ON KEY LABEL F6 WUT = ' '
ON KEY LABEL F7 WUT = ' '
ON KEY LABEL F8 WUT = ' '
ON KEY LABEL F9 WUT = ' '
ON KEY LABEL F12 WUT = ' '
*********************************************************************
Bueno ALT+P es Imprimir ==== eso le puse en el boton que es para imprimir, cuando le configuras en el caption la tecla de acceso rapido, alli le puse para imprimir que presionado simultaneamente ALT y despues la tecla P me manda a imprimir o si deseo presiono F2 me ahorro de eso y me envia a la impresora un reporte.
ALT+B es buscar
ALT+L es eliminar
ALT+I es ingresar nuevo registro
ALT+C es cancelar
ALT+M es modificar
ALT+S es salir del form
ALT+G es guardar.
Espero te sirva
Marcelo Barberis
Bolivia
En un formulario en el evento Activate puse esto:
ON KEY LABEL F2 KEYBOARD '{ALT+P}'
ON KEY LABEL F4 KEYBOARD '{ALT+B}'
ON KEY LABEL F5 KEYBOARD '{ALT+L}'
ON KEY LABEL F6 KEYBOARD '{ALT+I}'
ON KEY LABEL F7 KEYBOARD '{ALT+C}'
ON KEY LABEL F8 KEYBOARD '{ALT+M}'
ON KEY LABEL F9 KEYBOARD '{ALT+S}'
ON KEY LABEL F12 KEYBOARD '{ALT+G}'
y en el evento Deactivate puse esto:
ON KEY LABEL F2 WUT = ' '
ON KEY LABEL F4 WUT = ' '
ON KEY LABEL F5 WUT = ' '
ON KEY LABEL F6 WUT = ' '
ON KEY LABEL F7 WUT = ' '
ON KEY LABEL F8 WUT = ' '
ON KEY LABEL F9 WUT = ' '
ON KEY LABEL F12 WUT = ' '
*********************************************************************
Bueno ALT+P es Imprimir ==== eso le puse en el boton que es para imprimir, cuando le configuras en el caption la tecla de acceso rapido, alli le puse para imprimir que presionado simultaneamente ALT y despues la tecla P me manda a imprimir o si deseo presiono F2 me ahorro de eso y me envia a la impresora un reporte.
ALT+B es buscar
ALT+L es eliminar
ALT+I es ingresar nuevo registro
ALT+C es cancelar
ALT+M es modificar
ALT+S es salir del form
ALT+G es guardar.
Espero te sirva
Marcelo Barberis
Bolivia
Daniel Sánchez
Oct 2, 2011, 12:21:57 AM10/2/11
to publice...@googlegroups.com
Podrías activar el keypreview del formulario, para utilizar el método keypress donde se captura todas las teclas que se presionen en el formulario y capturar la teclas deseada como en el siguiente ejemplo
Saludos
Reset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú
Lparameters NKEYCODE, NSHIFTALTCTRL
Do Case
Case NKEYCODE=-1 &&F2
Thisform.TEXTSELECC1.Click
Case NKEYCODE=-2 &&F3
This.GRUPOTOOLS.ACTIVATOOLS(100)
Case NKEYCODE=-4 &&F5
This.GRUPOTOOLS.ACTIVATOOLS(200)
Case NKEYCODE=-5 &&F6
This.GRUPOTOOLS.ACTIVATOOLS(300)
Case NKEYCODE=-8 &&F9
This.GRUPOTOOLS.ACTIVATOOLS(400)
Case NKEYCODE=-9 &&F10
This.GRUPOTOOLS.ACTIVATOOLS(900)
Case NKEYCODE=16 .And. NSHIFTALTCTRL=2 &&Ctrl+P
Thisform.PGF.PAGE1.CMDIMPRIMIR.Click
Endcase
Los valores para nkeycode son los que se encuentran en la ayuda usado en on key
Daniel Sánchez Escobar
Investigación y DesarrolloReset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú
Mario Alfredo
Oct 12, 2011, 6:23:05 PM10/12/11
to Comunidad de Visual Foxpro en Español
hoy aprendi algo que ya lo habia preguntado y daniel tiene la
respuesta
como utilizar el abedecedario para opciones de tecla rapido para
opciones de un menu
lo colcaba asi
if NKEYCODE=16 &&Ctrl+P
y no me funciona hasta presionar dos veces seguidas
me faltaba algo NSHIFTALTCTRL=2
aparece
y es cierto
para la A=1 B=2 C=3 solo hay una letra que tiene 127
eso es lo de menos
gracias daniel
respuesta
como utilizar el abedecedario para opciones de tecla rapido para
opciones de un menu
lo colcaba asi
if NKEYCODE=16 &&Ctrl+P
y no me funciona hasta presionar dos veces seguidas
me faltaba algo NSHIFTALTCTRL=2
Case NKEYCODE=16 .And. NSHIFTALTCTRL=2 &&Ctrl+P
ahora ya lo se, cuando uno busca no encuentra, cuando ya no lo busca
aparece
y es cierto
para la A=1 B=2 C=3 solo hay una letra que tiene 127
eso es lo de menos
gracias daniel
Reply all
Reply to author
Forward
0 new messages