Bonjour,
j'aimerai faire dans mon programme un système d'aide comme sur tout logiciel pratiquement, c'est à dire que lorsque la touche F1 est enfoncée un fichier d'aide apparait, voici mon code :
Donc c'est le code de l'évènement OnKeyUp sur mon form, le message c'est juste pour faire un test. Ce code ne fonctionne pas, lorsque j'appui sur F1 rien ne se passe.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 procedure TfrmRet.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_F1 then begin MessageDlg('Mot de passe incorrect',mtError,[mbOk],0); end; end;
Avez vous une idée pour résoudre mon problème ?
Partager