救命啊！用fast report打印数据库图片的问题。(80分)

救命啊！用fast report打印数据库图片的问题。
我在设计fast report报表时，如果数据库中存的是bmp图片在fast report中就可以打印。
但我存的是jpg图片在fast report中就出错。在fast report中哪个放图片的控件，图片
格式的属性改为jpg，可还是出错。难道fast report不支持jpg.
大家救命.我明天就要交货了。

写点代码,看我的!
procedure Tpdfrm.frReport1BeforePrint(Memo: TStringList; View: TfrView);
var
ls: TPicture;
begin
if (View.Name = 'Picture1') and not ADOQuery2PhotoGraph.IsNull then
begin
ls := TPicture.Create;
try
ADOQuery2PhotoGraph.SaveToPicture(ls);
//这个blobFiled是一个加强型的blobfield,你如果用原生的BlobField
还要写点代码转换一下,就是JPEGImage.Assign(...),反正思路是给你了.
TfrPictureView(View).Picture.Bitmap.Assign(ls.Graphic);
finally
ls.Free;
end;
end;

frPicture处理JPG只能是直接处理文件,换句话说,frPictrue"能"处理JPG是因为他
在装入文件时进行了处理.至于数据库字段,那还不行.
另外还要告诉你,有一个现成的frADVPicture可以实现直接处理JPG.

这样好像不可以。

修改 FASTREPORT SOURCE 目录下的 FR.INC ，将 {$DEFINE JPEG} 前面的两个 // 删除，
然后重新编译 FR 控件包，重新编译 APP。

Xxfeng的应该是对的.
我看了一下fr.inc说明.应该是如此.我以前以为fr没有这个功能.

可怜我以前写那么长代码去实现.

多人接受答案了。