Q&A

  • 버튼에 대한 단축키를 Ctrl+F2 로 주기
버튼에 대한 단축키를 Ctrl+F2 로 주고 싶은데
KeyDown 이벤트에서 하니. 잘 안되네여..

아시는분.. 답변 부탁드립니다.
1  COMMENTS
  • Profile
    홍성락 2003.04.17 20:07
    현재 키 상태에서 컨트롤키를 추가해서 누른 효과입니다
    if 문을 써서 F2를 snfmfEoaks wjrdydzpgkaus ehlfrjqslek.

    var
        pKeyboardState : ^TKeyboardState;
    begin
        New(pKeyboardState);
        GetKeyboardState(pKeyboardState^); //초기 상태 구함
        pKeyboardState^[VK_CONTROL] := $80; //Ctr키를 누를 상태로 설정
        SetKeyboardState(pKeyboardState^);
    end;

    해제하는 것은
    var
       pKeyboardState : ^TKeyboardState;
    begin
       New(pKeyboardState);
       GetKeyboardState(pKeyboardState^); //초기 상태 구함
       pKeyboardState^[VK_CONTROL] := $0; //Ctr키를 누를 상태해제
       SetKeyboardState(pKeyboardState^);  
    end;

    hsr/////////////////////////////////////////////////////