powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word 2007 (SavePictureWithDocument)
2 сообщений из 2, страница 1 из 1
Word 2007 (SavePictureWithDocument)
    #36680296
VBMart
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго времени суток!
Пробовал искать решение своей проблемы на разных форумах, но, увы, безуспешно.
Пишу программу на Delphi 2006.
Необходимо вставить несколько изображений в документ MS Word 2007.
Использую ОЛЕ( W:=CreateOleObject('Word.Application'); ).
Пробую сделать так:
W.ActiveDocument.Tables.Item(TableNum).Cell(Row, Col).Select; // Выделяю фрагмент для вставки
W.Selection.InlineShapes.AddPicture(FileName, False, True);
Результат - первая картинка отображается. Вместо остальных - пустые рамки по их размерам.

Пробую так:
W.ActiveDocument.Tables.Item(TableNum).Cell(Row, Col).Select; // Выделяю фрагмент для вставки
W.Selection.InlineShapes.AddPicture(FileName, True, False);
Результат - все картинки отображаются. Но необходимо сделать так, чтобы привязки к внешнему файлу не было.

Пробую так:
W.ActiveDocument.Tables.Item(TableNum).Cell(Row, Col).Select; // Выделяю фрагмент для вставки
p:= W.Selection.InlineShapes.AddPicture(FileName, True, False);
p.Select;
p.LinkFormat.SavePictureWithDocument:= True;
p.LinkFormat.BreakLink;
Результат - первая картинка отображается. Вместо остальных - пустые рамки по их размерам.

P.S.: При использовании Word 2003 все работает замечательно. Проблема появилась при переходе на 2007 офис.
...
Рейтинг: 0 / 0
Word 2007 (SavePictureWithDocument)
    #36707240
VBMart
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может кто-нибудь может посоветовать, в каком направлении копать?
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word 2007 (SavePictureWithDocument)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]