Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

заполнение OleContainer из BlobField 


SVS   (2001-12-04 13:11) [0]

Hello All !
Помогите плиз, в базе хранятся документы Word однако при их выводе в OleContainer
возникает ошибка "Invalid stream format"

procedure Blob2OLEContainer(aDataSet: TDataSet; aBlobFieldName: string; aOleContainer:
TOleContainer);
var
MS:TMemoryStream;
begin
MS:=TMemoryStream.Create;
TBlobField(aDataSet.FieldByName(aBlobFieldName)).SaveToStream(MS);
Stream.Position:=0;
aOleContainer.LoadFromStream(Stream); // --- "Invalid stream format"
aOleContainer.DoVerb(ovShow);
Stream.Free;
end;

--
Regards,
SVS mailto:svs-12345678@mail.ru



Юрий Жуков   (2001-12-04 14:20) [1]

Поставь свойство у OleContanter OldFormat (кажись так называется) - в справке об этом написано




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.049 c
14-22371          Дремучий              2001-11-08 17:11  2002.01.08  
Жизнь после смерти?


14-22367          Nest                  2001-11-08 14:56  2002.01.08  
Куда пойти учиться?


3-21900           vano                  2001-12-07 11:13  2002.01.08  
TString и String


1-22124           abandon               2001-12-18 02:16  2002.01.08  
Метки на jpg, bmp ит.д.


14-22326          McSimm                2001-11-04 11:35  2002.01.08  
Кто-то хотел размять (себе) мозги? Какие будут варианты алгоритма?