怎样在MainForm处理Edit控件的回车？

[Wakingly]

菜鸟问题：
我想实现在Edit中输入数据后按回车键进入下一个Edit控件，请问怎样实现？
我试了在MainForm的OnKeyPress中处理，行不通，DefaultHandler也不行。

[xdljf]

在Edit的Onkeyup中处理，注意将MainForm的KeyPreview属性设为true

[楚人无衣]

procedure TForm1.FormCreate(Sender: TObject);
begin
self.KeyPreview := true;
end;

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
Key := #0;
self.Perform(WM_NEXTDLGCTL, 0, 0)
end;
end;

[广州接入]

呵呵你要设置你的MainForm中的KeyPreview属性为真。