请问一个数据库ADODataSet为空时候的问题。请高手指点。谢谢谢谢谢谢谢谢谢谢谢谢谢谢!!

时间:2022-12-11 08:16:09
我在一窗体的FormCreate事件里写下了下面一段代码:
ADODstSite->Connection =FrmMDIMain->Cn;
ADODstSite->Prepared =true;
AnsiString AStrSql;
AStrSql="select * from Sites";
ADODstSite->CommandText =AStrSql;
ADODstSite->Active =true;
ADODstSite->Open();
ADODstSite->First();

然后在窗体的FormClose事件里写了下面的代码:
Action=caFree;
在窗体的一个Button控件的Click事件里写了下面的代码:
ADODstSite->Close();
Close();

请问当Sites表里的数据为空的时候,当我点击Button控件退出窗体的时候,为什么出错?
错误描述如下:
'BOF或EOF中有一个"真",或者当前的记录已被删除,所需的操作要求一个当前的纪录。'
请问该怎么解决?谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢!!

14 个解决方案

#1


是BCB 5 吧,要下载一个补丁,在WWW.BORLAND.COM

#2


spaceman(菜鸟.net) 我怎么没找到补丁啊?能给个下载的地址直接下载吗?

#3


http://info.borland.com/devsupport/bcppbuilder/patches/

#4


spaceman(菜鸟.net) 怎么还有密码呢?密码在哪里?没有密码不能安装啊?

#5


这是5的问题,直接装6就可以了

#6


可是公司就让我用5,原来的程序都是用5做的。不能换了。

#7


用try catch(...)把所有有关数据库连接的代码保护起来;不在BCB环境下运行程序时,错误就看不到了。

#8


这样不是把所有的错误都给屏蔽掉了吗?别的错误改怎么捕捉?

#9


你是5.0,还是5.5,在哪里要密码?我安装的时候怎么没有啊?

#10


这样写在BCB环境下运行时仍然报错,但在系统环境下直接运行build好的程序时不会报错的。

#11


spaceman(菜鸟.net) 我的是5.0
安装程序提示输入:Serial Number和Authorization Key
这是为什么啊?输不正确不让安装啊

#12


ADODstSite->First();
这行不用就OK了,没有必要把指针定位到第一笔,

#13


下载补丁

#14


hong668(心情不错) ,你说的方法不行啊。

lf43(小飞侠) 我确实下在了补丁啊,可是补丁有密码,不能安装啊!

#1


是BCB 5 吧,要下载一个补丁,在WWW.BORLAND.COM

#2


spaceman(菜鸟.net) 我怎么没找到补丁啊?能给个下载的地址直接下载吗?

#3


http://info.borland.com/devsupport/bcppbuilder/patches/

#4


spaceman(菜鸟.net) 怎么还有密码呢?密码在哪里?没有密码不能安装啊?

#5


这是5的问题,直接装6就可以了

#6


可是公司就让我用5,原来的程序都是用5做的。不能换了。

#7


用try catch(...)把所有有关数据库连接的代码保护起来;不在BCB环境下运行程序时,错误就看不到了。

#8


这样不是把所有的错误都给屏蔽掉了吗?别的错误改怎么捕捉?

#9


你是5.0,还是5.5,在哪里要密码?我安装的时候怎么没有啊?

#10


这样写在BCB环境下运行时仍然报错,但在系统环境下直接运行build好的程序时不会报错的。

#11


spaceman(菜鸟.net) 我的是5.0
安装程序提示输入:Serial Number和Authorization Key
这是为什么啊?输不正确不让安装啊

#12


ADODstSite->First();
这行不用就OK了,没有必要把指针定位到第一笔,

#13


下载补丁

#14


hong668(心情不错) ,你说的方法不行啊。

lf43(小飞侠) 我确实下在了补丁啊,可是补丁有密码,不能安装啊!