Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Uso de las Teclas de Funciones (https://www.clubdelphi.com/foros/showthread.php?t=79533)

hondaalberto 13-07-2012 22:37:48

Uso de las Teclas de Funciones
 
Buenas Tardes Amigos Necesito que al presionar una de las Teclas de Funciones se ejecute un bloque de código que yo especifique para borrar una línea en un DBGRID.

En el Evento OnKeyPress del Formulario tengo el Siguiente Código para validar si se presionó la tecla F4, pero no Hace nada, me gustaría Saber si es que me Falta algo por colocar en el Código.


Código Delphi [-]
If (Key=Char(VK_F4)) Then
 Begin
   DsLinVentasTemp.DataSet.Delete;
End;

Muchas Gracias por Anticipado...

ecfisa 13-07-2012 22:45:45

Hola hondaalberto.

Tenes que usar el evento OnKeyDown, ejemplo:
Código Delphi [-]
 
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);
begin
  if Key = VK_F4 then
    ShowMessage('Tecla F4 presionada');
end;

Saludos.

hondaalberto 14-07-2012 00:01:07

Muchas Gracias ecfisa Funciona perfectamente...


La franja horaria es GMT +2. Ahora son las 01:28:10.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi