怎样将JPEG文件保存在Access数据库中才能在FastReport中显示出来?(200分)

  • 主题发起人 主题发起人 donkey
  • 开始时间 开始时间
D

donkey

Unregistered / Unconfirmed
GUEST, unregistred user!
我把JPEG文件保存到Access数据库中,但是不能在FastReport中显示出来,
我的代码如下:
procedure SavePicture(img:TImage);
var
JPGImg: TJPEGImage;
ADOData: TADOBlobStream;
begin
JPGImg := TJPEGImage.Create;
ADOData :=
TADOBlobStream.Create(TBlobField(DataModule1.PatientInfoTable.FieldByName('图像1')), bmWrite);
try
JPGImg.Assign(img.Picture.Bitmap);
JpgImg.SaveToStream(ADOData);
finally
JPgImg.Free;
ADOData.Free;
end;
end;

请问:
怎样将JPEG文件保存在Access数据库中才能在FastReport中显示出来?
 
只保存路径算了,要的时候直接从文件中调出.
 
我的问题已经解决了,能收回一部分分吗?
 
>>我的问题已经解决了,能收回一部分分吗?
把解决办法方法贴出来吧,分可以还给你,[:D]
 
简单,只要定义JPEG就可以了,因为FastReport里虽然有JPEG的选项,但是没有使JPEG格式
生效。[8D][8D][:D][:D][:D]
 
very sorry, 搞错了 [:(]
 
xjc_first:
只保存路径算了,要的时候如何直接从文件中调出(请给出代码)?
donkey:
请教问题是如何解决的?能给代码吗?
my email:liyigang@263.net.
 

Similar threads

后退
顶部