En mis aplicaciones con Clipper, usaba para que el usuario saliera de capturas de facturas, notas de venta, compras, etc., la tecla F10, pero ahora lo uso con un boton de GRABAR, pero por costumbre mis clientes me piden que use de nuevo el F10, pero en vez de ejecutarme el GRABARBOTONCLICK, me manda al menu de la aplicacion.
Alguien podria darme un norte de como hacerlo con Xailer?
Gracias de antemano.
Saludos.
--
Ramón Zea
01.993.231-62-29
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
dirza_com@hotmail.com
--
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Capturar F10
-
- Mensajes: 1831
- Registrado: Mar Oct 11, 2005 9:53 am
Capturar F10
Ramón Zea
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/
Móvil: 01-993-231-62-29
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoftware/
Capturar F10
La clase TForm tiene un evento llamado OnKeyDown en el que puedes
capturar las pulsaciónes de teclado. Puedes probar con un msginfo para
ver que 'codigo' tiene la tecla F10 cuando utilizes este evento.
Pero a veces al utilizarlo me he encontrado con un problema y es que a
veces, da la sensación de que Windows se 'antepone' a la captura de este
evento.
capturar las pulsaciónes de teclado. Puedes probar con un msginfo para
ver que 'codigo' tiene la tecla F10 cuando utilizes este evento.
Pero a veces al utilizarlo me he encontrado con un problema y es que a
veces, da la sensación de que Windows se 'antepone' a la captura de este
evento.
Capturar F10
Ramón,
En mis aplicaciones con Clipper, usaba para que el usuario saliera de capturas de facturas, notas de venta, compras, etc., la tecla F10, pero ahora lo uso con un boton de GRABAR, pero por costumbre mis clientes me piden que use de nuevo el F10, pero en vez de ejecutarme el GRABARBOTONCLICK, me manda al menu de la aplicacion.
Alguien podria darme un norte de como hacerlo con Xailer?
La tecla F10 no genera ningún mensaje WM_KEYDOWN, y por eso no puedes recibirla en el evento OnKeyDown. Esa tecla es la que utiliza windows para abrir el menú, pero antes genera un mensaje WM_SYSKEYDOWN, que sí puede ser interceptado. Tendrías que crear un método WMSysKeyDown() en el formulario y desarrollarlo así:
METHOD WMSysKeyDown( nKey, nFlags ) CLASS TForm1
IF nKey == VK_F10
// Aqui debes hacer lo que necesites
RETURN 0 // Muy importante para que no se abra el menu
ENDIF
RETURN Nil
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--
En mis aplicaciones con Clipper, usaba para que el usuario saliera de capturas de facturas, notas de venta, compras, etc., la tecla F10, pero ahora lo uso con un boton de GRABAR, pero por costumbre mis clientes me piden que use de nuevo el F10, pero en vez de ejecutarme el GRABARBOTONCLICK, me manda al menu de la aplicacion.
Alguien podria darme un norte de como hacerlo con Xailer?
La tecla F10 no genera ningún mensaje WM_KEYDOWN, y por eso no puedes recibirla en el evento OnKeyDown. Esa tecla es la que utiliza windows para abrir el menú, pero antes genera un mensaje WM_SYSKEYDOWN, que sí puede ser interceptado. Tendrías que crear un método WMSysKeyDown() en el formulario y desarrollarlo así:
METHOD WMSysKeyDown( nKey, nFlags ) CLASS TForm1
IF nKey == VK_F10
// Aqui debes hacer lo que necesites
RETURN 0 // Muy importante para que no se abra el menu
ENDIF
RETURN Nil
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
--
-
- Mensajes: 148
- Registrado: Mar Dic 18, 2007 4:39 pm
Capturar F10
Hola Ramon yo uno esa tecla en mis programa para ciertas cosas al ver
que los eventos que lanza el teclado no la captura lo hice con un SET
KEY en mi funcion MAIN y luego pregunto segun que ventana activa tengo
en ese momento para que me haga la operacion que necesito.. Asi mas o
menos lo hago...
En la funcion MAIN()
SetKey( VK_F10,, {|| TeclaF10() } )
Y en cualquier lado...
Function TeclaF10()
If Application:oActiveForm:ClassName == "oFrmFACFacturacion"
MsgInfo("Pulsado F10")
Else
Return 0
EndIf
Return Nil
Espero que te sirva sino me dices !!!
Ramón Zea escribió:
> En mis aplicaciones con Clipper, usaba para que el usuario saliera de
> capturas de facturas, notas de venta, compras, etc., la tecla F10, pero
> ahora lo uso con un boton de GRABAR, pero por costumbre mis clientes me
> piden que use de nuevo el F10, pero en vez de ejecutarme el
> GRABARBOTONCLICK, me manda al menu de la aplicacion.
>
> Alguien podria darme un norte de como hacerlo con Xailer?
>
> Gracias de antemano.
>
> Saludos.
> --
> Ramón Zea
> 01.993.231-62-29
> http://www.paginasprodigy.com/zeasoftware/
> zeasoftware@prodigy.net.mx <mailto:zeasoftware@prodigy.net.mx>
> zeasoftware@hotmail.com <mailto:zeasoftware@hotmail.com>
> ramonzea@yahoo.com <mailto:ramonzea@yahoo.com>
> zeasoft.movil@hotmail.com <mailto:zeasoft.movil@hotmail.com>
> dirza_com@hotmail.com <mailto:dirza_com@hotmail.com>
que los eventos que lanza el teclado no la captura lo hice con un SET
KEY en mi funcion MAIN y luego pregunto segun que ventana activa tengo
en ese momento para que me haga la operacion que necesito.. Asi mas o
menos lo hago...
En la funcion MAIN()
SetKey( VK_F10,, {|| TeclaF10() } )
Y en cualquier lado...
Function TeclaF10()
If Application:oActiveForm:ClassName == "oFrmFACFacturacion"
MsgInfo("Pulsado F10")
Else
Return 0
EndIf
Return Nil
Espero que te sirva sino me dices !!!
Ramón Zea escribió:
> En mis aplicaciones con Clipper, usaba para que el usuario saliera de
> capturas de facturas, notas de venta, compras, etc., la tecla F10, pero
> ahora lo uso con un boton de GRABAR, pero por costumbre mis clientes me
> piden que use de nuevo el F10, pero en vez de ejecutarme el
> GRABARBOTONCLICK, me manda al menu de la aplicacion.
>
> Alguien podria darme un norte de como hacerlo con Xailer?
>
> Gracias de antemano.
>
> Saludos.
> --
> Ramón Zea
> 01.993.231-62-29
> http://www.paginasprodigy.com/zeasoftware/
> zeasoftware@prodigy.net.mx <mailto:zeasoftware@prodigy.net.mx>
> zeasoftware@hotmail.com <mailto:zeasoftware@hotmail.com>
> ramonzea@yahoo.com <mailto:ramonzea@yahoo.com>
> zeasoft.movil@hotmail.com <mailto:zeasoft.movil@hotmail.com>
> dirza_com@hotmail.com <mailto:dirza_com@hotmail.com>