//原始的方法
  Edit2.OnClick := Edit1.OnClick;
  Edit2.OnEnter := Edit1.OnEnter;
  Edit2.OnExit := Edit1.OnExit;
..........