如何在FastReport中打印JPG图片(50分)

  • 主题发起人 主题发起人 lucky_qiu
  • 开始时间 开始时间
L

lucky_qiu

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在FastReport中打印JPG图片?
我要打印的JPG图片在网络映射盘中,图片名在数据库中.
我试过:Picture1.picture.LoadFromFile('M:/OKpicture/[trim(<frxDBDataset1.&quot;qc_os&quot;>)].jpg');
但失败!
请各位仁兄指教!我用FastReport3.15!!
 
你的问题好像有人回答过,自己也好好找找吧.
在'Load'或'Browse'按钮的 OnClick 事件中加入:
begin

if OpenPictureDialog1.Execute then

begin

AJpeg.Free;
//释放旧AJpeg;
AJpeg:=TJpegImage.Create;
//产生一个新的AJpeg;
AJpeg.LoadFromFile(OpenPictureDialog1.Filename);
//载入JPEG文件;
end;

Canvas.Rectangle(2,2,560,430);
//将Form Clear;
x:=10;
y:=10;
Form1.Canvas.Draw(x,y,AJpeg);
//显示新的AJpeg;
end;
 
自已解决了:
procedure Page1OnBeforePrint(Sender: TfrxComponent);
begin
picture1.Picture.LoadFromFile('M:/OKpicture/'+(trim(<frxDBDataset1.&quot;qc_os&quot;>))+'.jpg');

end;
多谢支持!!!!!!!!!!!!!
 

Similar threads

后退
顶部