关于adoQuery关闭的问题 我通过adoQuery查询数据库,当返回一个空时(一条记录也没查到),执行adoQuery.close方法便会报错:“bof 或 eof中有一个时真,或当前记录已被删除,所需的操作要求有一个当前记录”,怎么解决啊 ? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 什么版本,D5好象有这个BUG,需要打补丁! procedure TfrmCty_Main.btnBrowseSearchClick(Sender: TObject); var sql:String;begintry begin frmSearch := TfrmSearch.create(self); frmSearch.Width := 580; frmSearch.Height := 330; frmSearch.Close; if frmSearch.ShowModal = mrOK then begin adoQuerySelect.Close; adoQuerySelect.sql.Clear; sql := 'select sd_cty.CTY_CDE, sd_cty.CTY_DESC , sd_cty.EFF_DTE,sd_ccy.CCY_CDE, sd_ccy.CCY_DESC from sd_cty,sd_ccy where sd_cty.CCY_OID =sd_ccy.CCY_OID '; adoQuerySelect.SQL.append(sql); if frmSearch.edtCondition.Text <> '' then begin adoQuerySelect.SQL.add('and sd_cty.CTY_DESC like "'+frmSearch.edtCondition.Text+'"'); //showMessage(adoQuerySelect.SQL.Text); end; adoQuerySelect.Open; adoQuerySelect.Active := False; adoQuerySelect.Active := true; end; //frmLookUp.Free; end;finally begin //adoQuerySelect.Free; frmSearch.Free; end;end;end; 文本内容插入数据库 请问各位高手,如何获得MP3音乐的振幅(声强) 奇事都被我碰到,快点帮我。 求真正的dll(ocx,exe)注册代码! 没有女朋友可以分手,郁闷ing 不想让用户直接操作数据库/可以怎么办,用户需用在DBGRID输入数据 一段程序,高手给看看。 dbgrid 在导出Excel表的遇到这样一个问题~~~ 问: 李维的《ADO/COM+》一书第9章中的MD53Access的库从那里来的? 非常郁闷,保存表时无法将 NULL 值插入列!!! 关于ShellTreeView一个错误
var sql:String;
begin
try
begin
frmSearch := TfrmSearch.create(self);
frmSearch.Width := 580;
frmSearch.Height := 330;
frmSearch.Close;
if frmSearch.ShowModal = mrOK then
begin
adoQuerySelect.Close;
adoQuerySelect.sql.Clear;
sql := 'select sd_cty.CTY_CDE, sd_cty.CTY_DESC , sd_cty.EFF_DTE,sd_ccy.CCY_CDE, sd_ccy.CCY_DESC from sd_cty,sd_ccy where sd_cty.CCY_OID =sd_ccy.CCY_OID ';
adoQuerySelect.SQL.append(sql); if frmSearch.edtCondition.Text <> '' then
begin
adoQuerySelect.SQL.add('and sd_cty.CTY_DESC like "'+frmSearch.edtCondition.Text+'"');
//showMessage(adoQuerySelect.SQL.Text);
end; adoQuerySelect.Open;
adoQuerySelect.Active := False;
adoQuerySelect.Active := true;
end;
//frmLookUp.Free;
end;finally
begin
//adoQuerySelect.Free;
frmSearch.Free;
end;
end;end;