C czhysj Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #1 假设我在一FORM里面定义许多按钮，请问怎样才能定义几个功能键，当我按了某个 功键之后它自动执行某个按钮的CLICK事件!(必须是功能键)
U unreal Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #2 Form的KeyPreview设为True. 然后在FormKeyDown或FormKeyUp判断按下了什么键就执行哪个事件.
F Fyx Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #3 在 OnShortCut 事件里写代码： procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean); begin if msg.CharCode = 34 then Button1.Click; end;
在 OnShortCut 事件里写代码： procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean); begin if msg.CharCode = 34 then Button1.Click; end;
Y YNTW Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #4 Form.KeyPreview:=True; BottonA.Caption:='按钮(&A)'; 编写BottonA的OnClick事件代码； 程序执行过程中按Alt+A就相当于执行BottonA的OnClick事件了。
Form.KeyPreview:=True; BottonA.Caption:='按钮(&A)'; 编写BottonA的OnClick事件代码； 程序执行过程中按Alt+A就相当于执行BottonA的OnClick事件了。
C cgh0717 Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #6 还有，在用TWebBorwser编程时，菜单没有办法响应ShortCut
C czhysj Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-04 #8 Fyx,我把Form的KeyPreview设为True，然后在KEYDOWN事件写上，if key=VK_F12 then button1.click(按F12键)，但当我按下F12时竟然出现CPU调试窗口，当我用ONSHORTCUT也 是一样出现这个窗口，请问为什么!同时因为我要求用功能键， 所以象ALT，CTRL的组合键就不符合要求!
Fyx,我把Form的KeyPreview设为True，然后在KEYDOWN事件写上，if key=VK_F12 then button1.click(按F12键)，但当我按下F12时竟然出现CPU调试窗口，当我用ONSHORTCUT也 是一样出现这个窗口，请问为什么!同时因为我要求用功能键， 所以象ALT，CTRL的组合键就不符合要求!
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-25 #9 czhysj:如果你还要继续讨论请定期提前你的帖子，如果不想继续讨论请结束帖子。
Z zqmagic Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-25 #10 你说的在按下F12时竟然出现CPU调试窗口，是不是在delphi的集成环境中，如果是的话，你把它 编译后执行exe文件试试看。
G gcq Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-25 #11 一定是的！ 执行编译好的EXE就不应该回有问题！ 除非你又定义的与WINDOWS有冲突的功能键！
