怎么样判断EDIT的值改变?

Edit.Text:='123';这为EDIT的默认值(这个默认值也会根据需要不同,这里只说明EDIT一开始就有一个值了)
我想通过回车来做处理,并且在里面判断回车之前是否值有所改变.
procedure TForm.Edit1KeyPress(Sender: TObject; var Key: Char);
var s1,s3 :string;
begin
if Edit1.Text='' then
exit;
if key=#13 then
  begin
  //判断值是否改变?
????????????????????????????????
if 有改变 then
   Form.FocusControl(Button1);
    else
   Edit1.Text :=Edit2.Text;
  end;
end;