用普通的image控件怎么把图片存入access数据库。。

解决方案 »

  1.   

    换个控件比较的方便!
    ImageEn,Delphi园地有下
      

  2.   

    pics:=TStream.Create;
       dm1.ADOQuery1.Edit ;
       pics:=dm1.ADOQuery1.CreateBlobStream(dm1.ADOQuery1.FieldByName('PHOTO'),bmReadWrite) ;
       img_photo.Picture.Graphic.SaveToStream ( pics);
      pics.Position:=0;
       dm1.ADOQuery1.Edit ;
       Tblobfield(dm1.ADOQuery1.FieldByName('photo')).LoadFromStream(pics);
        pics.Free;
    pics是TMemoryStream