Capturer F10 dans Delphi

Question

J'essaye de capturer la clé F10 dans Delphi, mais il semble continuer à activer le menu parce qu'il est converti de vk_F10 en vk_menu ou quelque chose.

Answer 1

Si vous êtes sous Windows, voici un code pour faire un crochet du clavier en utilisant l'API Windows: http://www.delphitricks.com/source-code/windows/install_a_keyboard_hook.html

Answer 2

L'événement OnKeyDown suivant ajouté à ma forme principale devrait fonctionner. Notez que vous devez définir le paramètre clé sur zéro pour empêcher l'activation du menu:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; 
    Shift: TShiftState); 
begin 
    if key = VK_F10 then begin 
    Label1.Caption := 'You hit F10'; 
    key := 0; 
    end; 
end;