FastReport显示数据库图片问题 ( 积分: 100 )

J

johnsonzl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #1

小弟在做fastport显示数据库图片时遇到下列问题(delphi7+fr3)
1.考虑到图片存放到数据库容量问题，将图片路径存储到商品明细数据库内
2.如何解决用fastport中Picture控件读取数据库存储路径字段同商品名称一起显示图片明细
最好能告知fastport中picture控件用法
不胜感激

 

J

johnsonzl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #2

小弟在做fastport显示数据库图片时遇到下列问题(delphi7+fr3)
1.考虑到图片存放到数据库容量问题，将图片路径存储到商品明细数据库内
2.如何解决用fastport中Picture控件读取数据库存储路径字段同商品名称一起显示图片明细
最好能告知fastport中picture控件用法
不胜感激

 

牵

牵手delphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #3

你用的fastreport版本是多少的？本人也正在研究fastreport制作报表，刚学没多久，我们
可以交流一下喔！！

 

T

tobey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #4

Picture的用法：显示数据库或文件的BMP，ICO，WMF 和JPG图像格式，来源可以是BLOB字段，不连接到FR.inc就不能在Fastreport中使用JPG格式。

 

R

robinluo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #5

奇怪的是，fastreport如果打印rtf，而rtf里面 有图片，图片就打印不出来，

 

L

levi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #6

只要想不到，没有做不到。以下是一个方法。
1、定义好报表，并在报表上放置Picture控件，名为Picture1
2、在打印前找到这个对象，
3、读入表中的图片，并将图片赋值给报表
4、显示报表
需要注意的是此方法仅适用于单页打印，如果多页的话，将显示相同图片。改进的方法是把类似的方法写到fr控件的Picture.LoadPicture中（可以记错了，进去看就知道了）
var v:TfrPictureView;
Jpg:TJpegImage;
begin
try
Jpg:=TJpegImage.Create;
Jpg.loadFromFile('路径');
with self.frReport1do
begin
v:=TfrPictureView(self.frReport1.FindObject('Picture1'));
V.Picture.Assigned(Jpg);
ShowReport;
end;
finally
Jpg.Free;
end;
end;

 

A

app2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-28

• #7

使用 TfrReport.OnBeforePrint 事件:
if View.Name = 'Picture1' then
TfrPictureView(View).Picture.LoadFromFile(...) 或
.Assign 或
.你所想要做的任何事情

 

J

johnsonzl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-29

• #8

屡试不成，不成屡试

 

C

chinalog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-28

• #9

up