我在access数据表中,一列存入姓名,一列存放图片路径,想通过办输入姓名,来查询相对应的图片,但程序运行时总是出错.请有会的哥哥给解答一下,或者有与这相关的源码也可以,数据库连接是没问题的,运行的时候提醒我找不到图片列,分不够还可以加.
procedure TForm1.Button1Click(Sender: TObject);
   var
  Content: string;
begin
  with ADOQuery1 do
  begin
    Content:=Edit1.Text;
    SQL.Clear;
      SQL.Add('select * from 表1 where xinming like :xinming');
      Parameters.ParamByName('xinming').value := Content;
      image1.Picture.LoadFromFile(ADOQuery1.FieldByName('tupian').AsString);
      end;
      end;
end.

解决方案 »

  1.   

    晕~~ 连ADO的OPEN都没有,怎么连?
      

  2.   

    IMAGE在LOAD前,加个OPEN一下ADO吧
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject); 
      var 
      Content: string; 
    begin 
      with ADOQuery1 do 
      begin 
        Content:=Edit1.Text; 
        SQL.Clear; 
          SQL.Add('select * from 表1 where xinming like :xinming'); 
          Parameters.ParamByName('xinming').value := Content; 
        open;
          image1.Picture.LoadFromFile(ADOQuery1.FieldByName('tupian').AsString); 
          end; 
          end; 
    end.如果还不行,把提示的错误贴出来~~
      

  4.   

    太粗心了,SQL.Add('select * from 表1 where xinming like :xinming'); 添加sql后,要打开才能访问其中的数据呀