|
![]() |
#1 |
Участник
|
Я когда на форму зашел у вашего вопроса уже 2 недели прошло, я думал не актуально) Если еще зайдете, вот решение.
Что бы вывести текст в ворд надо поставить в нужное место закладку (мой способ, возможно и в произвольное место, но я таких способов не знаю). Закладку можно поставить 2мя способами: либо через вкладкуВставка -> Закладки, либо через вкладку Разработчик -> Формы предидущих версий -> Поле. Далее в коде для первого случая Код: word Automation 'Microsoft Word 14.0 Object Library'.Application range Automation 'Microsoft Word 14.0 Object Library'.Range document Automation 'Microsoft Word 14.0 Object Library'.Document CREATE(word,TRUE) document := word.Documents.Open('Имя файла'); bookmark := bookmarks.Item('Имя закладки'); range := bookmark.Range(); range.Text('Текст'); document.FormFields.Shaded:=FALSE; word.Visible(TRUE); Код: WrdApp Automation 'Microsoft Word 14.0 Object Library'.Application WrdDoc Automation 'Microsoft Word 14.0 Object Library'.Document WrdFormFld Automation 'Microsoft Word 14.0 Object Library'.FormField WrdDoc := WrdApp.Documents.Open2000('Имя файла'); AuxTextString := 'Имя поля'; WrdFormFld := WrdDoc.FormFields.Item(AuxTextString); WrdFormFld.Result := 'Текст'; WrdDoc.FormFields.Shaded := FALSE; WrdApp.Visible := TRUE; WrdApp.Activate; ps У нас почему то часть одним способом сделана, часть другим) Сам не знаю почему... |
|
|
За это сообщение автора поблагодарили: gl00mie (2), Sancho (1). |
|
Опции темы | Поиск в этой теме |
Опции просмотра | |
|