delphi中更新表字段update BLOB型数据（image）/获取图片转成BLOB型存入数据库

最新推荐文章于 2021-05-07 17:28:57 发布

阿_洁

最新推荐文章于 2021-05-07 17:28:57 发布

阅读量1.5k

点赞数

分类专栏：数据库 delphi相关

本文链接：https://blog.csdn.net/urnot/article/details/78315473

版权

本文介绍了在Delphi中使用ODAC连接Oracle数据库时，如何更新BLOB类型（用于存储图片）的数据。作者遇到EInternal ERROR问题，通过将更新语句放入存储过程解决了这个问题。详细步骤包括调用存储过程和存储过程的代码实现。

摘要由CSDN通过智能技术生成

我用的是ODAC 链接oracle数据库，delphi中update BLOB型数据问题困扰了我很久，我发现我直接

v_sql :='update xx_image set image:=in_image where xx1='+xx1;
                  with dm_db.OraQuery1 do
                  begin
                  Close;
                  Sql.clear;
                  Sql.Add(v_sql);

                  ParamByName('in_image').AsOraBlob.LoadFromFile(uri);//uri是图片地址

                  ExecSQL;
                  end;

这么写，会报EInternal ERROR,在网上搜了好多也没有合适的解决方法，最后向同事请教，将更新语句写到数据库的存储过程中，然后调用存储过程，这样不会报错了。

调用存储过程语句：

with dm_db.DzdaProc do begin
                                StoredProcName := 'UPDATE_XX_IMAGE';//存储过程名
                                PrepareSQL;
                                ParamByName('in_xx1').AsString := xx1; <