Форум: "Базы";
Поиск по всему сайту: 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.71 MB
Время: 0.053 c
7-22429           Oleg_swap             2001-09-20 19:13  2002.01.08  
удаленный запуск программы


1-22177           Corte                 2001-12-21 09:38  2002.01.08  
Почему не работют бряки в


3-21983           victor                2001-12-06 13:13  2002.01.08  
серийный номер на делфи 6


1-22261           bk                    2001-12-17 15:42  2002.01.08  
Excel


4-22485           Delphi5.01            2001-11-05 06:56  2002.01.08  
Как можно загрузить свой курсор в дельфи!