如何在quickReport中显示数据库中的jpg图片? 如题,希望介绍的详细一些。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var MS: TMemoryStreamTBlobField(YourField).SaveToStream(MS));QrIMage1.Picture.Graphic.LoadFromStream(Ms); var MS: TMemoryStreamTBlobField(YourField).SaveToStream(MS));QrIMage1.Picture.Graphic.LoadFromStream(Ms);上面多一个括号。 这样就行了么,不是说qrimage对jpg的支持不是很好吗? var bs : TMemoryStream; jp : TjpegImage; jp.Assign(Your Field); jp.SaveToStream(bs); if bs.Size > 0 then begin qrimage1.Picture.Assign(jp); end; (急)不知道delphi中有输入输出流的概念吗?通信方面 很多人想从DELPHI 转向JAVA说是JAVA 的工资高,DELPHI 的工资太少了,各位有何看法? 用 SQL SERVER 连接数据库的问题 关于动态创建计算字段!200分进者有分 简单问题,哪里可以找到控件完整的属性、方法、和函数的电子书? 使用delphi如何操纵excel来合并单元格(2) 谁有车牌识别相关的delphi代码 fast report 条码问题 特急!!一个数据库问题。 请问各位高手,怎样才能过滤IE中的网页。 COM的线程模型的问题,困惑我许久了... 要买本本,想听听意见,关于联想的笔记本
MS: TMemoryStreamTBlobField(YourField).SaveToStream(MS));QrIMage1.Picture.Graphic.LoadFromStream(Ms);
MS: TMemoryStreamTBlobField(YourField).SaveToStream(MS));QrIMage1.Picture.Graphic.LoadFromStream(Ms);
上面多一个括号。
bs : TMemoryStream;
jp : TjpegImage; jp.Assign(Your Field);
jp.SaveToStream(bs);
if bs.Size > 0 then begin
qrimage1.Picture.Assign(jp);
end;