Загрузить LOB в MS-Word

u905097
Дата: 09.11.2007 15:59:32
Подскажите, кто делал:
Необходимо загрузить данные из БД Oracle BLOB в редактор MS Word, исключая дисковые операции. Мой код выглядит так, но на предпоследней строке выскакивает ошибка.
Возможно, загрузку в MS Word можно выполнить как-то по другому ?
// -----------------------------------------------------------------------------
var
PBlobStream: TStream;
ALOBLocator: TLOBLocator;
AStream: TMemoryStream;
begin
OracleQuery1.SetVariable('DOC_ID', 1);
OracleQuery1.Execute;
ALOBLocator:=OracleQuery1.LOBField('DOC_BODY');
AStream:=TMemoryStream.Create;
ALOBLocator.Read(AStream.Memory^, AStream.Size);
PBlobStream:=AStream;
OleContainer1.LoadFromStream(PBlobStream); // здесь ошибка
OleContainer1.DoVerb(ovPrimary);
// -----------------------------------------------------------------------------