Delphi回车键切换焦点

交流QQ:2609715119

1. procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;  
2.   Shift: TShiftState);  
3. begin  
4.   if Key = vk_Return then  
5.     FindNextControl(ActiveControl,True,False,False).SetFocus;  
6. end;