使用QuickRpt打印相片的问题。 ( 积分: 200 )

  • 主题发起人 主题发起人 MyDelphiPower
  • 开始时间 开始时间
M

MyDelphiPower

Unregistered / Unconfirmed
GUEST, unregistred user!
1、我数据库里保存的是相片的路径;
2、如果使用TQRImage控件,所有的用户相片都是第一位用户的相片:
procedure TFrmPrint.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
QRImage1.Picture.LoadFromFile(FrmMain.ADOQuery.Fields[0].AsString);
end;

3、如果使用TQRDBImage控件,则根本显示不了相片,用流可以,但我数据库里是保存路径:
procedure TFrmPrint.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
QRDBImage1.Picture.LoadFromFile(FrmMain.ADOQuery.Fields[0].AsString);
end;

不知道还有没有办法可以显示相片??
 
我操,这个世界没有天理了~~~~~ MD,老虎不发威,当我是病猫
 
QRDBImage1.Picture.LoadFromFile(FrmMain.ADOQuery.Fields[0].AsString);
FrmMain.ADOQuery.Fields[0].AsString 这个有问题吧 ?? 文本模式 如何实现图象打印?
 
QR我不熟悉,说不出具体办法,但是以上思路肯定可行,我成天用的一个程序就是这样做的
(应该是D6+Qr开发的)
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
571
import
I
I
回复
0
查看
712
import
I
后退
顶部