删除表格控件记录方法
在表格控件过程 fterRowColChange的代码(表格的行、列号改变时发生)jlh=Recno() && jlh--记录号变量
Go jlh
Thisform.label1.Caption='当前记录'+Str(jlh,2)+'/总记录:'+Str(Reccount(),2)
Thisform.GRid1.Refresh
。。。。。。
delete
pack && 表要以独占方式打开
Thisform.GRid1.Refresh
。。。。。
本人已编程测试
QQ:965788818
Email:jfl2008a@