Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Взоимодействие 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 и ты в шоколаде.


 
lewka ©   (2010-02-15 20:55) [8]

Вот попробовал такой код
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". Но почитал, что пользуются такой командой. Подскажите почему ошибка появляется


 
12 ©   (2010-02-16 09:45) [9]

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


 
YurikGL ©   (2010-02-27 06:58) [10]


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

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



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.045 c
15-1263814649
Делфиец
2010-01-18 14:37
2010.08.27
Заколебали спамеры, как защитьться


15-1263914019
TUser
2010-01-19 18:13
2010.08.27
СШ ГЭС: обледенение


15-1269551843
boa_kaa
2010-03-26 00:17
2010.08.27
Броузеры: очередное соревнование


15-1265314234
Kerk
2010-02-04 23:10
2010.08.27
Задачка


2-1267385084
bag
2010-02-28 22:24
2010.08.27
массивы