-------关于DBEdit等控件,如何在修改之后提示保存?(不好意思,没分了看看也行)

Question

请问DBEdit1...等控件绑定到了DataM.Customer中,偶在其相关的Ds_Customer的UpdateData中加入了判断,但为什么总是提示我保存?请问,如何改?谢了...------------------------------------------------------------------procedure TDataM.Ds_CustomerUpdateData(Sender: TObject);
beginif MessageDlg('是否要保存记录 ?',mtConfirmation, [mbYes, mbNo], 0) <> mrYes then
       Customer.Cancel
    else
        Customer.Post;  
end;

Answer 1

自己解决了,公布答案以分享...
procedure TDataM.CustomerBeforePost(DataSet: TDataSet);
begin
  if  application.MessageBox('是否保存？','Information',mb_okcancel+mb_iconquestion)<>mrok   then
  begin   
      begin
      Customer.cancel;
      abort;   
      end;   
  end;
end;