首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

定义一个公用的进程,访问数据库

2012-12-22 
定义一个公用的过程,访问数据库procedure Tfmbook.tabsheetjsShow(Sender: TObject)beginself.etrq.Text

定义一个公用的过程,访问数据库

procedure Tfmbook.tabsheetjsShow(Sender: TObject);
begin
self.etrq.Text :=datetostr(date);
self.aopen(self.adqxs,'select * from xs');
end;
procedure tfmbook.aopen(adoq: TADOQuery; str: string);
begin
adoq.Active :=false;
adoq.SQL.Clear ;
adoq.SQL.Add(str);
adoq.Active :=true;
end;
这是我定义的一个过程,在运行了之后,在adoq.Active :=true;这一句出现了错误,是“stream read error"
不知道是怎么回事,我也找不出是到底是什么问题,请大家帮忙……
[解决办法]
该回复于2009-06-19 09:21:45被版主删除
[解决办法]
gjajsfaj

热点排行