合计怎么跟着变

合计如何跟着变?
我用VFP9.0,在form中做了一个grid1、text1(显示grid1某列不为0的记录个数)、text2(显示grid1某列合计数),如何做到:在grid1中每输入一个数值,text1的统计数字与text2的合计数字跟着刷新,我曾经在grid的text控件的lostfocus中写入count与sum,可是输入下一个数值的时候,记录指针指向最后了,请教高手赐教!

------解决方案--------------------
有很多方法可以避免指针被改变:
1. 最笨的办法:统计前先保存 recno() 的值,统计后恢复
2. 较好的办法:
在适当位置用 use (Thisform.grid1.RecordSource) again in 0 alias tmp_calc 在新工作区中重复打开要统计的表
用 calculate count(*), sum(合计字段名) to Thisform.text1.Value, Thisform.text2.Value for 合计字段名 != 0 in tmp_calc 来更新统计结果
3. 最好的办法:用 sql-select 语句来更新统计结果
dimension laTemp[2]
laTemp = 0
select count(*), sum(合计字段名) ;
from (Thisform.grid1.RecordSource) where 合计字段名 != 0 ;
into array laTemp
Thisform.text1.Value = laTemp[1]
Thisform.text2.Value = laTemp[2]

更新统计放在 LostFocus 事件中不太合适,放入 InteractiveChange 事件中好点