怎样把图片存到Access数据库里？

这个问题问得好，我也保存不进去。关注！！！
upup

解决方案 »

  1.   

    这个问题问得好，我也保存不进去。关注！！！
    upup
      

  2.   

    var
    pic:TPicture;
    bf:string;
    begin
    pic:=TPicture.create;
    pic.LoadFromFile(tuFilename.Text);//Bmp文件名
    CompressBitmap(pic.Bitmap,bf);//ZIP算法压缩可以压缩到原来得30%左右(bmp)
    InsMap.ParamByName('编号').asstring:=getbh;//编号
    InsMap.ParamByName('日期').asdatetime:=date;
    InsMap.ParamByName('图文件').AsBlob:=bf;
    InsMap.ExecSQL;
    pic.free;
    end;
      

  3.   

    我能保存进去啊，可以用流来操作，也可以用TBLOBFIELD来操作的