为何在表单中有时能而有时不能捕获回车键(100分)

C

chuandy

Unregistered / Unconfirmed
GUEST, unregistred user!
在用菜单项调用一个form时,我已将其属性keypreview置为true,开始运行时能够捕获回车键,但当我在此项目中加入另一个form,并在此form中也想捕获回车时,奇怪的是,不但后一个form不能捕获,前一个form也不能捕获回车键了。
请高手给予指导。
 
主要是焦点问题,注意当前焦点是什么,在当前焦点对象的 onkeydown 事件中判
key的值13(HEX 0D)
 
我试过没有这个问题呀!

procedure TForm1.FormKeyDown(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin
if Key=13 then
ShowMessage('asdf');
end;
 
应该不会有此问题,
因为独立的窗口的消息是单独处理的。
 
是有这个问题,我也碰到过
 
接受答案了.
 
顶部