del=messagebox("确定要删除当前记录吗",32+4+256,"删除记录")
if del=6
  SET EXCLUSIVE ON
  DELETE RECORD RECNO()
  TABLEUPDATE(1)
  REQUERY("user")
  thisform.refresh
  thisform.container1.grid1.setfocus
  GOTO BOTTOM
  SET EXCLUSIVE off
ELSE
  SET EXCLUSIVE off
endif

删除代码如上
表格如下
工号  密码  分组
11    2222   a
22    3333   b
11    4444   c
我选定了第3行，点了删除按钮，结果第1行和第3行同时被删除，求解

RECNO()本来指定的就是当前选定的位置，还是没搞懂怎么定义事先保存的删除位置？？求版主指点，我做这个程序已经规避了姓名重复的问题，但为了追求完美，不能有BUG，所以遇到的这种情况还需要解决