当grid中只有一条记录时，删除该条记录，然后再增加一条问题（解决）

radiofan 发布于 2021-03-03 14:48， 1515 次点击

当grid中只有一条记录时，
删除该条记录，
    DELETE
    skip -1
    thisform.grid1.ActivateCell(1,1)
    thisform.grid1.setfocus

然后再增加一条问题
    append blank
    GO BOTTOM
    thisform.grid1.ActivateCell(1,1)
    thisform.grid1.setfocus

此时表格中不会出现该条记录，再增加一条才会显示增加的两条记录，不知何故？

[此贴子已经被作者于2021-3-3 17:18编辑过]

4 回复

强国学习2021-03-03 15:10

thisform.refresh

radiofan2021-03-03 15:23

以下是引用强国学习在2021-3-3 15:10:43的发言：

thisform.refresh

不需要全部重画哦！

radiofan2021-03-03 16:50

可以 ……column2.setfocus，column1.setfocus，移动下焦点解决，但是，当表格中只有一行一列数据，那又怎么办呢？

radiofan2021-03-03 17:18

select tablename
thisform.grid1.recordsource = ""
append blank
go top
thisform.grid1.recordsource = "tablename"
GO BOTTOM
thisform.grid1.setfocus

*****OK