ayuda con las hotkey en delphi

[MCanuto]

que código hay poner para que una hotkey pare un timer, por ejemplo. Hace falta la función Getasynckeystate?

[ecfisa]

Hola MCanuto y bienvenido a Club Delphi

Como a todos los que se inician te invitamos a que leas nuestra guía de estilo.

Para tu caso creo que te puede servir capturar la tecla presionada en el evento OnKeyDown de tu form.
En el ejemplo el TTimer es activado por la tecla F1 y desactivado por F2, pero podes elegir las que desees (busca por Virtual key codes en la ayuda de Delphi).

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  KeyPreview := True;
  ...
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  case Key of
    VK_F1: Timer1.Enabled := True;  
    VK_F2: Timer1.Enabled := False;
  end;
end;

Saludos.

[MCanuto]

no veo ese evento no sé si será porque me baje un programa algo antiguo, tengo el Borland Delphi 7 no veo esa opción, que programa me recomendarías que tuviese todas las opciones?

[ecfisa]

Empezado por MCanuto

no veo ese evento no sé si será porque me baje un programa algo antiguo, tengo el Borland Delphi 7 no veo esa opción, que programa me recomendarías que tuviese todas las opciones?

Hola MCanuto.

En tiempo de diseño, hace lo siguiente:

• Click sobre tu form (el form quedará como el objeto actualmente seleccionado).
• Presiona la tecla F11 (tiene que aparecer el Object Inspector si estaba oculto).
• En el Object Inspector, click en la pestaña Events.
• Doble click sobre OnKeyDown.

Saludos.

[MCanuto]

Gracias, el código me funciono pero solo se activa o desactiva el timer si tengo la ventana del proyecto abierta y pulso la tecla, si tengo otra ventana abierta y pulso la tecla de activar o desactivar no hace nada

¿No habría alguna forma de solucionar eso?

Un saludo.

[ecfisa]

Hola MCanuto.

Revisa en estos enlaces:

• llamar mi aplicacion con una combinacion de teclas
• register a systemwide hotkey?

Podes encontrar mas sobre la funcion aqui: RegisterHotKey.

Saludos.

[FerJavRec]

Empezado por MCanuto

Gracias, el código me funciono pero solo se activa o desactiva el timer si tengo la ventana del proyecto abierta y pulso la tecla, si tengo otra ventana abierta y pulso la tecla de activar o desactivar no hace nada

¿No habría alguna forma de solucionar eso?

Un saludo.

Hola MCanuto, fíjate que hay un componente que solo lo arrastras al Form y te hace todo lo que necesitas. CKeysOnForm si no lo encontras te lo subo.

saludos
FerJavRec