UC知道delphi查询Access数据库时有问题，快来帮忙呀！
来源：百度知道 编辑：UC知道 时间：2024/09/28 15:26:59
我用ADOQuery+Datasource+ADOConnection，要把edit的数据显示在dbgrid上，可是有的数据明明输对了却在结果中显示为空(各项参数设置都正确,Edit名称为number).
代码:procedure Tshebeichaxun.BitBtn1Click(Sender: TObject);
begin
If number.Enabled=True then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from 仪器设备 where');
ADOQuery1.SQL.Add('统一编号='''+number.Text+'''');
ADOQuery1.Open;
end;
end;
end.
代码:procedure Tshebeichaxun.BitBtn1Click(Sender: TObject);
begin
If number.Enabled=True then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from 仪器设备 where');
ADOQuery1.SQL.Add('统一编号='''+number.Text+'''');
ADOQuery1.Open;
end;
end;
end.
是部查询不能得到正确结果,还是所有查询都得不到正确结果?
如果都得不到正确结果,则:
1、判断条件更改一下：if number.text<>"" then
2、在第二个ADD里面，单引号后统一编号前加一空格，即ADOQuery1.SQL.Add(' 统一编号="'+number.Text+'"');
3、你的统一编号字段是数据值型还是文本型，如果是数据值型，则将你的双引号去掉，即ADOQuery1.SQL.Add(' 统一编号='+number.Text);
如果是部分情况得到不正确结果，则用like,更改为模糊查询试试看
你的意思是在edit中输入个条件吧？
然后按这个条件查询数据库？
有的没显示出来是数据库里没有呗。
加个判断，如果查询没有这个记录给个提示框就ok了。
老子日,慢了一步