请问,打印报表中Image字段怎样可以显示Jpeg图片? (100分)

  • 主题发起人 主题发起人 caifei3000
  • 开始时间 开始时间
C

caifei3000

Unregistered / Unconfirmed
GUEST, unregistred user!
我的MS_SQL资料表中有Image字段﹐怎样在报表中把存在Image字段中的图片(jpeg)显示出来?(如﹕身份证照片)
代码:
 
TQRDBImage可以
 
TQRDBImage和数据库相关字段相连就行了,什么也不做!
 
1.QRImage, 自己处理数据库blob的读取与转换与写入QRImage的操作.
2.]
od1是个 打开文件的通用对话框控件
procedure TForm1.Button1Click(Sender: TObject);
var
B :Tbitmap;
begin
if od1.Execute then
begin
B := Tbitmap.Create;
B.LoadFromFile(od1.FileName);
DBImage1.Picture.bitmap.Assign(b);
end;
end;
 
我的方法:
var
MyStream:TMemoryStream;
begin
MyStream:=TMemoryStream.Create;
MyStream:=TBlobField( Table1.FieldByName('imagefield').SavetoStream;
MyStream.saveTofile('aaa.bmp');
QRImage1.Picture.LoadFromFile('aaa.bmp');
........
试试看
 
用QRDBImage会报错﹐用Qrimage不会随记录不同改变图片。请大家帮我一下。
 
用TQRDBImage,我试过了,没有报错的情况,很正常,我不知道你是怎么做的???
 
你是JPEG还BMP﹐BMP不会报错﹐JPEG会。
 
后退
顶部