怎么样判断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; 问题点数：20、回复次数：12Top

1 楼lianshaohua（永远深爱一个叫“...”的好女孩儿!）回复于 2005-07-20 23:29:07 得分 5

把原先的值保存在一个变量中，然后比较就可以了Top

2 楼lijinghe1（喜欢没有文化性格泼辣身材高大的女人）回复于 2005-07-21 00:52:11 得分 0

厉害，已经可以了Top

3 楼xixuemao（钱不是问题，问题是没钱）回复于 2005-07-21 07:58:11 得分 0

好厉害，真的已经可以了Top

4 楼hellolongbin（一个人(自从扩充话题改版，再也不去灌水乐园了)）回复于 2005-07-21 08:08:46 得分 4

在onchange事件里写Top

5 楼heluqing（鉴之小河〖劳累求充实〗)(vcl .net）回复于 2005-07-21 08:11:31 得分 0

难道是传说中的那个倒分帖的翻版???Top

6 楼hhzqf1980（hh）回复于 2005-07-21 09:11:34 得分 0

把原先的值保存在一个变量中Top

7 楼lianshaohua（永远深爱一个叫“...”的好女孩儿!）回复于 2005-07-21 09:39:50 得分 4

???????????????????????????  
  在edit的onexit（失去焦点）事件中写更好一点；Top

8 楼Alanwn（天痴(日本人与狗不得回答问题)）回复于 2005-07-21 12:36:23 得分 4

edtnote.ModifiedTop

9 楼WuChenCan（雨中男孩）回复于 2005-07-21 12:47:01 得分 0

对edit.Modified属性就可以了Top

10 楼linghengmao（）回复于 2005-07-21 16:16:19 得分 3

定义一个变量A,将EDIT.TEXT的值赋给它,在ONCHANGE里面写代码:IF   EDIT.TEXT<>A   THEN   SHOWMESSAGE('CHANGE');Top

11 楼aladdin2006（回答问题不接分，不想要分，只为提高技术，解决问题）回复于 2005-07-21 16:40:33 得分 0

厉害，已经可以了      
   
  这句话怎么这么熟呢！Top

12 楼lythink（香蕉羊）回复于 2005-07-21 21:45:03 得分 0

已经修改了,分太少了,各位就一点点了哈:)Top

相关问题

• edit
• 判断
• 变量
• 改变
• then
• text

• 帖主：lythink
• lianshaohua
• hellolongbin
• lianshaohua
• Alanwn
• linghengmao

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载