2 replies to this topic

[el-mono]

Hola. Como puedo capturar en el evento Keydown de un formulario las teclas Ctrl+F5 por ejemplo.

 

No se como usar el parametro Shift que trae este evento,

 

 

[egostar]

Hola. Como puedo capturar en el evento Keydown de un formulario las teclas Ctrl+F5 por ejemplo.
 
No se como usar el parametro Shift que trae este evento,

 
 
Hola amigo el-mono
 
Para capturar ese evento en un Form hay que hacer lo siguiente:
 

delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
    ShowMessage('Teclas presionadas');
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  KeyPreview := True;
end;
 
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (ssCtrl in Shift) and
     (Key=VK_F5) then
  begin
    Button1.Click;
  end;
end;

Saludos

Attached Files

•  KeyDown.png   31.76KB   1 downloads

[el-mono]

Gracias Egostar.