W
winsock
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么当我打开程序,指针停在dbgrid第一条记录,这时候点击删除按钮(有数据),就提示数据库为空。
如果用鼠标点击dbgrid第二条记录,在按删除就没有问题!在把指针点到第一条记录,就可以删除了,
很怪!这到底是怎么回事!
If adoquery1.Eof then
begin
showmessage('数据库为空,不能删除')
end
If application.MessageBox('是否删除','提示',MB_YesNo+MB_iconerror)=idyes then
Begin
adoquery1.Delete;
adoquery1.Last;
如果用鼠标点击dbgrid第二条记录,在按删除就没有问题!在把指针点到第一条记录,就可以删除了,
很怪!这到底是怎么回事!
If adoquery1.Eof then
begin
showmessage('数据库为空,不能删除')
end
If application.MessageBox('是否删除','提示',MB_YesNo+MB_iconerror)=idyes then
Begin
adoquery1.Delete;
adoquery1.Last;