Delphi 读取Oracle中图片 Unsupported stream format.解决方案

yhcad

于 2021-11-29 20:14:32 发布

阅读量953

点赞数

分类专栏： Delphi 文章标签：开发语言

本文链接：https://blog.csdn.net/yhcad/article/details/121618338

版权

Delphi 专栏收录该内容

27 篇文章 5 订阅

订阅专栏

在读取Oracle数据库的PHOTO字段照片是BLOB类型，用DBImage控件读取数据库照片时发现在编辑状态能正常显示照片，在调试运行状态时，无法显示照片，提示Unsupported stream format.错误。

解决办法：

对DBImage控件属性值DBImage1.DragMode := dmAutomatic; //显示图片自动模式

能正常显示照片。

procedure TFrmMain.BitBtn1Click(Sender: TObject);

begin

  dm.FDQuery1.Active :=True;
  dm.FDQuery2.Active :=True;
  DBImage1.DataSource :=dm.DataSource2;
  DBImage1.DataSource.DataSet.Active :=True;
  DBImage1.AutoDisplay := True; //显示图片
  DBImage1.Proportional :=True;  //成比例显示
  DBImage1.Stretch  :=True;  //图片拉伸至图框大小
  DBImage1.DragMode := dmAutomatic; //显示图片自动模式

end;