Ver Mensaje Individual
  #1  
Antiguo 01-01-2009
Ðαяισš Ðαяισš is offline
Miembro
 
Registrado: dic 2008
Posts: 42
Reputación: 0
Ðαяισš Va por buen camino
Evento "KeyPress" Como Usarlo?

Hola nuevamente, esta ves quisiera saber como activar un evento o funcion al presionar una tecla Cabe decir que el form estara minimizado cuando yo presione cierta tecla supongamos

(F1)

luego de activar dicha funcion

Código Delphi [-]
Timer.Enabled := True

deseo que con la misma tecla se desactive dicha funcion

Código Delphi [-]
Timer.Enabled := False

Se puede eso?

he estado "Investigando" y lo unico que encontre fue esto:

Código Delphi [-]
Procedure TForm1.Timer1Timer(Sender: TObject);
begin
if (GetAsyncKeyState(VK_F1) <> 0); then
Timer.Enabled := True
end;

pero no se como hacer para que con la misma tecla se desactive tal funcion

Código Delphi [-]
Timer.Enabled := False

Alguien sabe como?

Gracias a quienes puedan ayudarme.
Responder Con Cita