能不能讲的具体一点,怎么用的?
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
我反复的对一个表进行查找,每次从这个表里读取一条记录在次数超过80几次后就会出现这样的错误程序如下(简)
function seektable(SqlStr:string):string;
var
UpDate : TDataSource;
UpQuery : TQuery;
TempStr :string;
begin
UpDate:=TdataSource.create(self);
Upquery:=Tquery.Create(self);
UpDate.DataSet:=UpQuery;
UpQuery.DatabaseName:= extractfiledir(Application.ExeName)+'\dbf\';
UpQuery.close;
UpQuery.sql.clear;
UpQuery.sql.add('select * from "dbf.db" where TableName="'+SqlStr);
try
UpQuery.ExecSQL;
try
UpQuery.Open;
Except
on E:exception do
showmessage(E.Message);
end;
Except
on E:exception do
showmessage(E.Message);
end;
TempStr:=UpQuery.Fields.Fields[0].value;
UpQuery.close;
UpQuery.free;
UpDate.free;
seektable:=tempstr;
end;
进行多次操作后就不能再用了。
感谢
sun2000way