Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 3517|回复: 1

TDBImage无法显示图片

[复制链接]

该用户从未签到

发表于 2014-2-8 22:19:56 | 显示全部楼层 |阅读模式
数据库使用的是Oracle11g Express Edition, 直接使用里面的DEMO_PRODUCT_INFO表,里面有个blob型的字段,存放得是图像
Lazarus使用的是Zeroslib http://zeoslib.sourceforge.net/portal.php

TDBImage联动到ftBlob型的字段上,无法正确的显示图片。
无奈使用普通的TImage控件,使用如下的方法,倒是可以显示出来。

    try
      aStream:= Tmemorystream.Create() ;
      ZQuery1PRODUCT_IMAGE.SaveToStream(aStream);
      aStream.Position := 0;
      Image1.Picture.LoadFromStream(aStream) ;
    finally
      astream.Destroy ;
    end;      

是不是TDBImage无法支持Oracle的blob的字段阿,粗粗看了下TDBImage的代码,
没觉得和Delphi有什么明显的不同,可是Delphi上从来没有遇到这样的问题。
要说Zeroslib 有问题的话,可是用TImage的方法还是可以显示的。

等待大侠指点。

回复

使用道具 举报

  • TA的每日心情
    慵懒
    2016-6-5 17:07
  • 签到天数: 1 天

    [LV.1]初来乍到

    发表于 2014-9-29 15:01:02 | 显示全部楼层
    我觉得将图片路径存入数据库比较好,而不是图片
    回复 支持 反对

    使用道具 举报

    *滑块验证:

    本版积分规则

    QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

    GMT+8, 2025-5-2 10:21 , Processed in 0.033530 second(s), 10 queries , Redis On.

    Powered by Discuz! X3.4

    Copyright © 2001-2021, Tencent Cloud.

    快速回复 返回顶部 返回列表