在表格的事件中，interactivechange是表格的值被修改时发生的，有什么办法能够在失去焦点时获得数据是否被修改，若已经修改则进行相应的处理，否则不处理。
先谢谢各位！

GETFLDSTATE( ) 函数

首先，在表单的初始化事件中对表设置缓冲；其次，最好在表单中增加两个两个属性：nRecnum、nWhatrow以利于编程；最后，在表格的afterrowcolchange和beforerowcolchange事件中写入相关代码，以判断是否改变了数据。

form初始化：

 PUBLIC   plRowMove   
  plRowMove=.T.   
 
IF NOT USED("表")
   USE 表 IN 0
ENDIF

SELECT 表

SET MULTILOCKS ON  
= CURSORSETPROP('Buffering', 5, '表' )


grid的afterrowcolchange:
LPARAMETERS nColIndex
lMov = .F.
IF ThisForm.nWhatRow # This.ActiveRow

ThisForm.nWhatRow = This.ActiveRow
nHold= RECNO()
GO ThisForm.nRecNum
cChange = GetFldState(-1,'表')
IF AT('2', cChange)>0
This.Refresh
lMov = .T.
IF MessageBox("确定要修改吗？",4)= 6
=TableUpdate(.T.)
ELSE
=TableRevert(.T.)
ENDIF
ENDIF
GO nHold
IF lMov
This.Refresh
lMov =.F.
ENDIF
ENDIF

grid的beforerowcolchange:
LPARAMETERS nColIndex
ThisForm.nRecNum = RECNO()

 IF   (THIS.RowColChange=1   OR   THIS.RowColChange=3)   AND   plRowMove=.F.   
  NODEFAULT   
  ENDIF

谢谢两位的回复！
我仔细看了楼上的代码及帮助文件后，觉得这种方法对于整个表格数据是否改变、是否需要再作相应处理很有效。但对表中的某个单元的数据是否改变、是否需要作相应的处理则显示有点太麻烦了，还不如不管是否变动，都将相关的数据计算一遍更省事些。
我发帖时没有将目的说清楚：我是在表格中当数量和单价修改时，就需要将本行的金额及表单中的合计金额同时更新。若没有修改则不需要进行这些操作。上面的检测代码远比我更新处理的代码多，所以还不如不管是否修改，当这两列失去焦点时都进行更新更简单些。
再次感谢两位，让我又了解了这几个函数和命令的用法。

上面程序是对记录有效的。如你改变了选中记录的字段值，在选中另一条记录时，会先提示你是否确认修改，在你作出选择后，焦点切换到另一条记录。

是有效的。但在我这个应用当中，程序代码就显的太多，直接重复计算还更简单一些。

[[it] 本帖最后由 hu9jj 于 2008-10-2 19:11 编辑 [/it]]