发信人: santar(Santar)
整理人: teleme(2001-02-05 11:26:16), 站内信件
|
将Form的属性
KeyPreview:=True;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Form1.Perform(WM_NEXTDLGCTL,0,0);
end;
【 在 hikehilter 的大作中提到:】
:本人在编写delphi中,发现这样一个问题,我想用键盘来操作焦点,当我按回车键时,能自动切换到下一个组件,但如果这样的话,不是要在每一个onkeypress事件中判断啊,或者在onexit事件中判断啊,那位大侠知道有更简单的方法吗?
:......
---- 昨天的我:玩!
今天的我:干!
明天的我:?? |
|