我想让bitbtn对F5响应,还有可以响应快捷键CTRL+Q,怎么设置。

解决方案 »

  1.   

    先设置bitbtn的shortcut 为F5;
    然后设置bitbtn的caption为  ‘名字(&Q)’
      

  2.   

    再放一个隐藏的bitbtn ,把另一个快捷方式付给他,然后让他们有同样的事件就行了。
      

  3.   

    bitbtn有shortcut的属性吗?,你们谁有清华大学出的<<构建进销>>的书,里面的例子实现的情况,但是我我总是实现不了,不知道什么原因。
      

  4.   

    把窗体的keypreview的属性设置为true,设置bitbtn的caption为  ‘名字(&Q)’
    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
    //事件
    end;procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
    if (Key = VK_F2)  then
        BitBtn1Click(self);end;