我的onkeydown事件不觸發了。怎么辦?我想按下Esc鍵就關閉程序。
但現在我程序onkeydown不觸發。
爲什麽啊?
我在onkeydown裡面寫了如下代碼:按下Esc鍵
 if key = VK_ESCAPE then
   begin
      ShowMessage('您按下了Esc鍵了!');
      close;
      sendkeys('%{F4}',false);
   end;現在連提示信息都出不來了。

解决方案 »

  1.   

    keyPreview  := True; 
    在ONkeyPress  裏試下看
      

  2.   

    在窗体上放个按钮,设置按钮的Cancel := True,在按钮的单击事件里写 Close;
      

  3.   

    keyPreview  := True; 
    我也加了,
    還是沒有用
      

  4.   


    二個: 1 .  放在 onkeyPress  試。       2.   你的事件是窗體的還是某一個BUTTO慬者基它的。焦點在個事件所有的控件上嗎?
      

  5.   

    onkeypress也試過了,
    不行。
    事件是個窗體~。
      

  6.   

    什麽缺省按鈕啊,放了按鈕,要操作onclick時間,我的程序只能操作鍵盤關閉還有你的攔截按鍵消息,怎么弄啊?
      

  7.   

    如果全鍵盤給你一個簡單的方法在你的窗體上放一個 Popmenu  在POPMENU裏增加一項叫ESC吧。POPMEN每項都有快鍵捷的,設置好了就行了。這種方式比較方便你統一管理。
      

  8.   


    POPMENU就是右鍵菜單,放到窗體上,然後將 FORM的POPUMENU設成你從控件裏拉的這個POPUMENU再增加POPEMNU的子項,子項裏的SHORTCUT項目,可以選擇的。POPUMENU 現 TMainMenu 用法一樣。