在Query的BeforePost里控制:
if Application.MessageBox('Save Data?', 'Question', MB_YESNO) <> ID_YES then
    Abort;

解决方案 »

  1.   

    你这样做的话,客户会不会认为很烦呢?
    我认为用dbgrid和cachedupdate配合比较好!
      

  2.   

    谢谢两位:TO :lastlove()lastlove() 
         能否具体讲讲思路,谢了!TO :forgot(让一切随风) 
         Abort?你是指什么?如果取消系统的保存操作?
      

  3.   

    有点问题,应该为Query1.Cancel,再Abort
      

  4.   

    谢谢两位,按 forgot(让一切随风) 的方法搞定。