Взоимодействие Word и Delphi

← →
lewka © (2010-02-11 13:40) [0]

Привет!!! Подскажите как вставить картинку, находящуюся в TImage в документ Word. Знаю что надо использовать OLE но какие команды использовать не могу найти. Подскажите

← →
YurikGL © (2010-02-11 14:12) [1]

Начать можно отсюда http://www.delphimaster.ru/articles/dbtoword/index.html

← →
Lewka © (2010-02-12 12:37) [2]

как работать с текстом и таблицами я знаю. А как вставить картинку или из TImage или по заданному пути я не знаю. Подскажите пожалуйста!!!

← →
12 © (2010-02-12 12:40) [3]

включи запись макроса, посмотри что пишется

← →
lewka © (2010-02-12 13:23) [4]

Мне бы не хотелось использовать макросы. Чисто только через OLE

← →
12 © (2010-02-12 13:43) [5]

> включи запись макроса, посмотри что пишется

и делай также через OLE

← →
Anatoly Podgoretsky © (2010-02-12 16:02) [6]

> Мне бы не хотелось использовать макросы. Чисто только через
> OLE

А кто заставляет, ты запись то с использованием не путай.

← →
NewZ © (2010-02-14 19:58) [7]

Открываешь картинку в Paint"е там или другом редакторе. Ctrl-C. Дальше запускаешь Word. Идешь Сервис - Макрос - Начать запись.

Всавляешь картинку.

Идешь Сервис - Макрос - Остановить запись.
Потом Сервис - Макрос - Изменить.

Смотришь код на VB. Переводишь на Delphi и ты в шоколаде.

Вот попробовал такой код
procedure TForm1.Button1Click(Sender: TObject); var MsWord:Variant; begin try MsWord:= CreateOleObject("Word.Application"); except ShowMessage("Не могу запустить MS Word"); end; MsWord.Visible := True; MsWord.Documents.Add; MsWord.ion.InlineShapes.AddPicture("c:\1.jpg", LinkToFile:=False, SaveWithDocument:=True); MsWord.Free;
но выдает ошибку "Method "ion" not supported by automation object". Но почитал, что пользуются такой командой. Подскажите почему ошибка появляется

ну и сотри ion :)
имхо, там было select ion, но там где ты читал некачественно копипастнули откудато

> MsWord.ion.InlineShapes.AddPicture("c:\1.jpg", LinkToFile:
> =False, SaveWithDocument:=True);
>

скоре всего не ion а selection :)

Взоимодействие Word и Delphi Найти похожие ветки