L
lidongshengly
Unregistered / Unconfirmed
GUEST, unregistred user!
请教高手.我要实现在quick报表中用Qrimage显示数据库中的图片,图片的格式只能用jpg格式.代码如下:
var ghy:TADOBlobStream;
pic:Tgraphic;
..........
//Rep1是一个TQRReport,与一个Tadoquery关联
pic:=nil;
ghy:=TADOBlobstream.Create(TBLOBField(Rep1.DataSet.FieldByName('photo')),bmRead);
pic.LoadFromStream(ghy);
Pic1.Picture.Graphic := pic;//Pic1是放在一个QRBand上面的QRImage
ghy.Free;
当程序执行到pic.LoadFromStream(ghy);这句时报地址错误,请高手指点
var ghy:TADOBlobStream;
pic:Tgraphic;
..........
//Rep1是一个TQRReport,与一个Tadoquery关联
pic:=nil;
ghy:=TADOBlobstream.Create(TBLOBField(Rep1.DataSet.FieldByName('photo')),bmRead);
pic.LoadFromStream(ghy);
Pic1.Picture.Graphic := pic;//Pic1是放在一个QRBand上面的QRImage
ghy.Free;
当程序执行到pic.LoadFromStream(ghy);这句时报地址错误,请高手指点