829
社区成员
发帖
与我相关
我的任务
分享为什么图片显示不出来呢？
我这样写，为什么显示不出图片来呀！数据库中以存入一个bmp的图片呀
Stream:=TMemoryStream.Create;
(Query1.FieldByName('xpsj') as TBLOBFIELD).SaveToStream(Stream);
ShowMessage(IntToStr(Stream.Size); //证明数据库中确实有图片的
Image1.Picture.Bitmap.LoadFromStream(Stream);
Stream.Free;
Stream:=TMemoryStream.Create;
(Query1.FieldByName('xpsj') as TBLOBFIELD).SaveToStream(Stream);
ShowMessage(IntToStr(Stream.Size); //证明数据库中确实有图片的
Image1.Picture.Bitmap.LoadFromStream(Stream);
Stream.Free;
...全文
请发表友善的回复…
发表回复
