Delphi6 如何给button按钮添加快捷键（回车）

Posted 2023-03-20

谢谢了啦 呵呵

按钮不能添加快捷键。但是你可以在button的caption字母前面加个 & 号，比如 确定(&S) ，这样，按下ALT+S键时，就会触发这个button的click事件。
如果你想让回车时触发这个button的click事件的话，就得自己写代码了。比如在edit1的keydown里写上 if key = #13 then button1.click 等等，这样，当你在edit1里面填写完东西后，按下回车，这个button的click就触发了。 参考技术A 把按钮的Default的属性设为True，运行时按下回车相当于点击按钮。

给Button按钮创建快捷键

实现效果：

　　

知识运用：

　　在按钮文本中添加 "&"+"字母"即可

　　补充：通过窗体的AccepButton属性指定按钮 　在窗体中按下Enter键时等同指定键

　　　　　　CancelButton属性　对应的Esc键

实现代码：

        private void button1_Click(object sender, EventArgs e)
        {
            MessageBox.Show("你单击了确定按钮","提示");
        }

        private void button2_Click(object sender, EventArgs e)
        {
            MessageBox.Show("你单击了退出按钮","提示");
        }