发信人: 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事件中判断啊，那位大侠知道有更简单的方法吗？
:......
----
昨天的我：玩！
今天的我：干！
明天的我：？？ |
|