FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Asociar boton a tecla de funcion
Hola, foristas.
Necesito crear un boton al cual tb se le pueda asociar una tecla de funcion, asi tanto si dan click en el boton o presionan F5, ejecuta la misma accion. No me doy cuenta cual boton puedo usar y como. Gracias |
#2
|
||||
|
||||
Pon el "KeyPreview" del formulario en "True" y luego en el evento OnKeyDown el nombre de la función que quieres que se ejecute:
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
||||
|
||||
Hola Ibidi.
.Poné la propiedad del form KeyPreview a True .Poné lo siguiente en el evento OnKeyDown del Form. Código:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_F5 then begin PostMessage(Button1.Handle, WM_LBUTTONDOWN, MK_LBUTTON,0); PostMessage(Button1.Handle, WM_LBUTTONUP, MK_LBUTTON,0); end; end; Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#4
|
||||
|
||||
Fuaa! Marcos que escribis rápido...
Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#5
|
||||
|
||||
Gracias a ambos.
Saludos. |
#6
|
||||
|
||||
Interesante, nadie ha nombrado un TAction y TActionList.
La ventaja de un TAction es que tiene una propiedad shortcut que puedes cambiar en tiempo de ejecución (el usuario decide qué tecla rápida usar), además no tendrías que escribir ni una sola línea de código, me refiero a que configuras todo con el ratón en tiempo de diseño.
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#7
|
||||
|
||||
Cita:
Mucho menos codigo, jeje!! Lo que comenta Lepe sobre TAction y TActionList, es muy cierto yo lo he usado en muchas ocasiones y va de maravilla. Ahora si requiero hacer algo rapido y si mayores necesidades de cambio en tiempo de ejecucion, utilizo el envento OnKeyDown del formulario como he comentado arriba. Saludos
__________________
Si robas, roba un beso, si mientes que sea por amor y si engañas que sea a la muerte!! |
#8
|
||||
|
||||
Si, es cierto afunez.
Y tambíen es correcto asignar directamente el procedimiento que se desee ejecutar. Código:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_F5 then begin ProcedureQueTambienLLamaElBoton; end; Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 27-07-2010 a las 00:25:17. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Manipular tecla de funcion f8 | carlos gonzalez | Varios | 1 | 14-05-2010 01:00:11 |
asigarnar tecla a un procedimiento o funcion | douglas | OOP | 4 | 21-10-2007 01:17:26 |
Asignar una tecla de funcion a un componente | CoCaInE | Varios | 2 | 19-06-2007 10:05:08 |
dbgrid con lookconmbobox y tecla de funcion | Choclito | Varios | 0 | 26-01-2007 16:15:31 |
Funcion del tabulador con otra tecla | gryphus | OOP | 2 | 18-04-2005 11:00:44 |
|