[搞定]急：关于png类型图片的载入及显示问题**

lily · 发表于 2007-9-20 09:46:23

我们需要将png格式的图片存入到数据库中，并显示出来。现在可以通过dataedit右键载入，也可以我们自己通过代码读入流的方式存入到数据库中，但是保存后，图片无法在dataedit中显示出来。请问如何解决这个问题？

jiahaiminghr · 发表于 2007-9-20 10:45:33

平台不支持对png文件的操作

lily · 发表于 2007-9-20 14:37:17

存入图片的代码
var
  lStream : TFileStream;
begin
  lStream := TFileStream.Create(vTemp,SysUtils.fmOpenRead);//vTemp为OpenDialog的FileName
DS_DZYZ.DataSet.Edit;
TBlobField(DS_DZYZ.DataSet.FieldByName('YZ')).LoadFromStream(lStream);
end;

读出图片的代码
var
  lStream : TStream;
begin
  lStream := TMemoryStream.Create;
  DS_DZYZ.DataSet.Edit;
  lStream := DS_DZYZ.DataSet.CreateBlobStream(DS_DZYZ.Dataset.FieldByName('YZ'),TBlobStreamMode.bmReadWrite);
  Image1.Picture.Graphic.LoadFromStream(lStream);//此处报错：引用的对象为空
end;

alang · 发表于 2007-9-20 14:58:13

Image1.Picture.LoadFromFile(vTemp);
Image1.Picture.Graphic.LoadFromFile(vTemp);
你用LoadFromFile函数看看呢
其实这里跟字段，跟流都没有关系，是你用错了TImage对象了

lily · 发表于 2007-9-20 15:08:34

但是我们读出图片的时候是读的数据库里面存放的二进制数据，数据库里面存放的并不是文件路径啊

alang · 发表于 2007-9-20 15:08:47

字段定义
数据类型：二进制流
表现类型：图像

用给你们的版本直接可以用DataEdit来显示png图片的

lily · 发表于 2007-9-20 15:13:19

字段类型这样设置的。
通过dataedit载入png图片是可以的，但是一旦保存，图片就无法在dataedit里面显示出来了，但是实际上图片内容是存入到数据库中的

alang · 发表于 2007-9-20 15:13:25

lStream := DataSetBZSJJ1.CreateBlobStream(DataSetBZSJJ1.FieldByName('TP'),TBlobStreamMode.bmReadWrite);
Image1.Picture. LoadFromFile(vTemp);
Image1.Picture.Graphic.LoadFromStream(lStream);
这样也不会报错

其实关键是要先创建Graphic对象，才可以调用他的方法

lily · 发表于 2007-9-20 15:28:09

我先试一下，那dataedit是否确实能显示png图片呐？我这里确实是不能显示

lily · 发表于 2007-9-20 15:45:22

还有人吗？

		自动登录	找回密码
密码			立即注册