如何从Delphi 7（ADO组件）将Blob数据插入到Oracle XE中

使用TAdoQuery组件检查这些样本。

直接从文件加载数据

 ADOQuery1.Parameters.AddParameter.Name:='Param1';
 ADOQuery1.Parameters.ParamByName('Param1').LoadFromFile('yourfilename',ftBlob);
 ADOQuery1.SQL.Add('INSERT INTO TableName (FieldName) VALUES (:Param1)');
 ADoQuery1.ExecSQL;

使用Stream加载数据

 ADOQuery1.Parameters.AddParameter.Name:='Param1';
 ADOQuery1.Parameters.ParamByName('Param1').LoadFromStream(AStream,ftBlob);
 ADOQuery1.SQL.Add('INSERT INTO TableName (FieldName) VALUES (:Param1)');
 ADoQuery1.ExecSQL;

您必须知道哪个与Microsoft Oracle oledb driver不兼容，请blob fields改用Oracle OLEDB provider。

作为最后的忠告如果可以的话，请尝试使用其他组件连接到Oracle一样的dbExpress，ANYDAC或ODAC组件

 

https://stackoverflow.com/questions/4713590/delphi-oracle-blob