如何使用ADO存取Oracle中的BLOB字段？急！

[lixrun]

ADO能否存取Oracle的Blob，如何设置？

[CSDNFAN1218]

EpDataModule->VioQuery->Close();
EpDataModule->VioQuery->SQL->Clear();
EpDataModule->VioQuery->SQL->Add("INSERT INTO B_WZZP(WZBH,WZZP,ZPLX) VALUES(:ID,:PICTURE,'0')");
switch(MainForm->iKind)
{
case 0 : TFileStream * TempFile;
sourcepic1=sourcepic1+".jpg";
TempFile = new TFileStream(sourcepic1,fmOpenReadWrite);
TempFile->Position=0;
EpDataModule->VioQuery->Parameters->ParamByName("ID")->Value=VioVeh.strWZBH;
EpDataModule->VioQuery->Parameters->ParamByName("PICTURE")->LoadFromStream(TempFile,ftBlob);
EpDataModule->VioQuery->ExecSQL();

[freshman2003]

我觉得不如用BDE，ADO用于SQLSEVER和ACCESS比较好。

[jishiping]

楼上 CSDNFAN1218(永无止境) 的代码，至少有一个错误。对于Oracle数据库，调用函数
LoadFromStream时，不能使用ftBlob，而应该使用 ftOraBlob。