delphi 전역 단축키 기능 구현

951 단어 Delphi
복잡한 거 없어요. 그냥 최근에 썼어요. 여러분과 나눠볼게요.
전역 단축키는 이 시스템에 초점이 맞지 않을 때도 사용되는 단축키입니다.
1. 우선 단축키를 등록해야 한다
    FShowkeyid := GlobalAddAtom('mykey_show');
    //F12
    RegisterHotKey(handle, FShowkeyid, 0 VK_F12);           
    //ctrl+F12
    RegisterHotKey(handle, FShowkeyid1, mod_control, VK_F12);   
    //alt+F12
    RegisterHotKey(handle, FShowkeyid2, mod_alt, VK_F12);   
    //ctrl+alt+f12
    RegisterHotKey(handle, FShowkeyid3, mod_control + mod_alt, VK_F12);  

2. 그 다음은 단축키를 받을 때 하는 처리
함수 성명은 다음과 같다.
4
    procedure hotykey(var msg:TMessage); message WM_HOTKEY;
다음과 같이 실현
procedure TFMain.hotykey(var msg: TMessage); 
    begin
      if (msg.LParamLo=MOD_CONTROL) and ( msg.LParamHi = VK_F12) then
        //    
    end;

3、마지막 단축키 시전
UnregisterHotKey( Handle, FShowkeyid );

좋은 웹페이지 즐겨찾기