[ingabraham]

Empezado por white_zombie

Como comenta el amigo MiKloSS seria algo asi:


Código Delphi [-]
procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin

if (msg.CharCode=VK_ESCAPE) and (msg.result=1) then
begin
showmessage('Has presionado ESC');
end
else if (msg.CharCode=VK_F1) and (msg.result=1) then
begin
showmessage('Has presionado F1');
end;

end;





Un Saludo.

Gracias me funciono a la perfección., ahora necesito es que si se da click en el boton help se active el f1, o haga algo.
gracias