给 Edit1添加 OnEnter 事件，代码只需一行：Edit7.Text := (Sender as TEdit).Text;选中其他5个，在属性面板中将5个的 OnEnter 事件指定为 Edit1Enter 即可；另外，在窗体的 OnShow 事件里执行一次初始化，让其显示当前已获得焦点控件的 text:Edit1.SetFocus;
