Модераторы: MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> OLEContainer и Blob, Ошибка при загрузке в OLEContainer 
:(
    Опции темы
Lence
Дата 29.7.2008, 22:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3
Привет всем. 
Задача из блоб поля загрузить ворд документ в OLEContainer и показать его.
Примеры и поиск особых результатов не дали.
Подскажите, что не верно делаю?

Код

try
    m := TBlobStream.Create((cc_data.FieldByName('doc') as TBlobField),bmRead);
    m.Position := 0;
    OLEContainer1.LoadFromStream(m);
    OleContainer1.DoVerb(ovShow);
  finally
    m.free;
  end;


Вываливается ошибка %1 already exists на OLEContainer1.LoadFromStream(m);



--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
Albinos_x
Дата 30.7.2008, 17:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 15
Всего: 108
Код

stream := TMemoryStream.Create;
(adotable1.FieldByName('Formula') as TBlobField).SaveToStream(Stream);
Stream.Seek(0,soFromBeginning);
OleContainer1.LoadFromStream(Stream);



--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
Lence
Дата 31.7.2008, 19:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3
Цитата(Albinos_x @ 30.7.2008,  17:43)
Код

stream := TMemoryStream.Create;
(adotable1.FieldByName('Formula') as TBlobField).SaveToStream(Stream);
Stream.Seek(0,soFromBeginning);
OleContainer1.LoadFromStream(Stream);

Тоже самое. Других вариантов нет?
Как вариант - сохранять блоб сожержимое на диск, потом с него загружать. Так работает. Но не хотелось бы. 

И каким образом открыть документ только для чтения? Так же вордовский попам выпадает - его бы тоже убрать. Только чтение всего документа.



--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
Lence
Дата 2.8.2008, 22:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3
Ребят, подскажите хотя бы как документ открыть только для чтения. Чтоб нельзя было изменять содержимое при просмотре документа. 
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
Albinos_x
Дата 4.8.2008, 21:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 15
Всего: 108
открывай или как шаблон или читай здесь http://forum.vingrad.ru/forum/topic-84634.html


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
Lence
Дата 4.8.2008, 23:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3
Цитата(Albinos_x @ 4.8.2008,  21:59)
открывай или как шаблон или читай здесь http://forum.vingrad.ru/forum/topic-84634.html

Спасибо прочту еще раз более внимательней smile
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: ActiveX/СОМ/CORBA"

Rrader
Girder

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Delphi
  • Вопросы по SQL и вопросы по базам данных, не связанные с Delphi, задавать здесь

Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0798 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.