利用缓冲，更新被修改的表中的记录
 
表单的init事件中：
SET MULTILOCKS ON
=CURSORSETPROP("Buffering",2)
保存按钮：
lModified=.F.
FOR nFieldNum=1 to  FCOUNT()
IF GETFLDSTATE(nFieldNum)=2
lModified=.T.
EXIT
ENDIF
ENDFOR
IF lModified
nResult=MESSAGEBOX("记录已经被修改，是否保存？",4+32+256,"数据更新")
IF nResult=7
=TABLEREVERT(.F.)
ELSE
=TABLEUPDATE(.t.)
ENDIF
ENDIF
THISFORM.refresh