J'aimerais bien quelques conseils sur l'utilisation des short key.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
 
//Dans la form principale OnCreate
 
If not RegisterHotkey
    (Handle, 1, MOD_CONTROL, Ord('C')) Then
     ShowMessage('Unable to assign Ctrl-C as hotkey.') ;
 
//Dans la form principale 
//procedure OnClose :
 
   UnRegisterHotkey( Handle, 1 ) ;
 
//Déclaration
 
   private // dans la déclaration de la form 
     Procedure WMHotkey( Var msg: TWMHotkey ) ;
       message WM_HOTKEY;
 
Procedure TForm1.WMHotkey( Var msg: TWMHotkey ) ;
   Begin
     If msg.hotkey = 1 Then Begin
       showmessage('test');
       //sendmessage(Application.Handle, WM_SHORTKEY, makeWord(Ord('C'), HOTKEYF_CONTROL	), 0);
   End;
Lorsque je veux executer ce code il me dit qu'il ne connait pas HOTKEYF_CONTROL... Pourtant le prog est bon puisque le message "test"
apparait bien.

merci pour vos suggestions

ludo