Question

delphi窗体键盘输入事件

我是新手，刚学delphi，请教大侠们一个问题：
我想在窗体内通过键盘按键来实现一些窗体操作，例如按ESC关闭窗体，按空白键模拟点击窗体内指定按钮组件，在无按钮的对话框按Y进行确定操作，按N进行取消操作，要求输入焦点不在任何组件上都能触发事件。
我在窗体的onkeypress事件定义if key=#27 then Free;但在窗体内按ESC没有关闭窗体，我应该在哪里定义呢？

Answer 1

给你个例子比如输入完edit1中的密码。点击enter键直接引发button1登入按键edit1的Onkeypass事件 if key=#13 then
begin
key:=#0;
button1.Click;
end; 你试试 窗体名.free