打印图片的问题

fk007 2008-09-20 04:07:35
var
jpg:TJpegImage;
FMemoryStream:TMemoryStream;
begin

jpg:= TJpegImage.Create;
FMemoryStream:= TMemoryStream.Create;
TBlobField(FieldByName('pic')).SaveToStream(FMemoryStream);
FMemoryStream.Position:= 0;
jpg.LoadFromStream(FMemoryStream);
self.QRImage1.Picture.Assign(jpg);

jpg.Free;
FMemoryStream.Free;
QuickRep6.PreviewModal;
end;
pic 是存照片的字段

我这样打印出来的照片有的是空的,有的还是有照片的 是怎么回事啊
...全文
42 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
五维思考 2008-09-29
  • 打赏
  • 举报
回复
可能与图片格式有关
柯本 2008-09-20
  • 打赏
  • 举报
回复
程序看上去没什么问题
查一下你的数据库,是否每个pic字段都含有合法的pic格式数据(你可以用循环将它们存到文件进行检查)

1,184

社区成员

发帖
与我相关
我的任务
社区描述
Delphi GAME,图形处理/多媒体
社区管理员
  • GAME,图形处理/多媒体社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧