Question

delphi如何判断edit文本是否修改？

已知：1个edit控件，1个button控件。我要实现的是：运行程序后，先点击button控件，输出消息：文本无修改。然后edit控件输入：edit1.text:='123';，点击button控件，输出消息：文本被修改了。

Answer 1

之前初始化edit1.text:=''; if trim(edit1.text)='' then begin messgaebox(self.handle,pchar('文本无修改'),'提示',64); end else begin messgaebox(self.handle,pchar('文本被修改了),'提示',64); end;