我设计了一个成绩管理的软件,要求能自动添加各班考号, 如从KH中自动从2740001进行增加 源程序如下: table1.first; kh:=274001; while not table1.eof do begin table1['kh']:=kh; table1.next; kh:=kh+1; end; 结果是显示数据集TABLE不在编辑或插入模式 请问如何解决?
Table1.First; kh:=274001; While Not Table1.Eof Do Begin Table1.Edit;//此为编辑 Table1.Insert;此为插入 只先其一 Table1['kh']:=kh; Table1.Post;//提交修改 Table1.Next; Inc(KH); End;