SoloCodigo

Programación General => Delphi => Mensaje iniciado por: beniciog en Lunes 28 de Junio de 2010, 06:56

Título: presionar F1
Publicado por: beniciog en Lunes 28 de Junio de 2010, 06:56

hola soy un programador novato la pregunta es la siguiente quiero saber como se hace cuando al presionar la tecla F1 del teclado me abra una ventana de mi programa delphi .Desde ya gracias .Benicio

Título: Re: presionar F1
Publicado por: Avindel en Martes 29 de Junio de 2010, 22:31

Hola, personalmente no te recomendaria utilizar esa tecla, puesto que esta en su mayoria es para mostrar la ayuda al usuario, almenos asi se acostumbra, sinembargo aqui te pongo el codigo, primero antes que nada tendras que activar en las propiedades de tu form la propiedad keypreview a true, despuesde eso el codigo va en el evento onKeydown de tu form :

Código: Delphi

1.  
2. procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
3.   Shift: TShiftState);
4. begin
5.         if key = VK_F1 then
6.         begin
7.         /// hago algo
8.         end;
9. end;
10.  
11.  

Título: Re: presionar F1
Publicado por: beniciog en Jueves 1 de Julio de 2010, 02:40

Avindel gracias por tu ayuda funciono perfectamente .Benicio

Título: Re: presionar F1
Publicado por: Avindel en Jueves 1 de Julio de 2010, 18:23

Cita de: "beniciog"

Avindel gracias por tu ayuda funciono perfectamente .Benicio

ok, me alegra haber ayudado.