要在 Delphi 中实现按回车后控件焦点的转移，可以调用 Windows API 消息发送函数 PostMessage，做法如下：
把 Form1 的 KeyPreview 属性设为 True，在 Edit 和 Memo 的 OnKeyPress 事件中加入以下代码：
if Key=#13 then
if not (ActiveControl is TMemo) then
PostMessage(Handle,WM_KERYDOWN,VK_TAB,0);
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024