Поля MS Word

← →
Laner6666 (2008-12-15 19:30) [0]

Доброго времени суток уважаемые!
В общем ситуация: в WORD-е 2007 создал поле Quote, ТЕКСТ=[Sity]
Выполняю следующий код:

try // create word instance wordapp := createoleobject("word.application"); except showmessage("cannot start ms word."); screen.cursor := crdefault; exit; end; try // open a word document wordapp.documents.add(template := "Файл........"); // show word wordapp.visible := true; // check if formfield exists and asign your text if wordapp.activedocument.bookmarks.exists("[Sity]") then wordapp.activedocument.formfields.item("[Sity]").result := "ГОРОД312"; finally wordapp := unassigned; screen.cursor := crdefault; end;

MS Word грузиться, но замены значения поля не происходит, поможте чем можте! ))
Всем спасибо большое!

← →
clickmaker © (2008-12-15 19:35) [1]

City, если уж на то пошло.
и почему ищещь его среди bookmarks?

← →
Lamer6666 (2008-12-15 19:46) [2]

> и почему ищещь его среди bookmarks?

: (
вообще с Word-ом не работал, нашел пример :
http://articles.org.ru/cfaq/index.php?qid=689
следую ему!

← →
clickmaker © (2008-12-15 19:48) [3]

в инете много глючных примеров.
попробуй заменить bookmarks на formfields.
Судя по коду, так логичней

← →
Lamer6666 (2008-12-15 20:01) [4]

Решил вообще убрать bookmarks

try
wordapp.documents.add(template := ExtractFilePath(Application.ExeName)+"\Reports\dp.doc");
wordapp.visible := true;
wordapp.activedocument.formfields.item("Sity").result := "your text";
finally
wordapp := unassigned;
screen.cursor := crdefault;
end;

При выполнении выдает ошибку "Запрашиваемый номер семейства не существует"
: (

← →
YurikGL © (2008-12-15 20:40) [5]

> if wordapp.activedocument.bookmarks.exists("[Sity]") then
>

bookmarks - набор закладок.
http://www.delphimaster.ru/articles/dbtoword/index.html здесь есть пример.
Советую пользоваться ими.

← →
Lamer6666 (2008-12-15 21:45) [6]

Стать хорошая многое подчерпнул, но непонятно как мне вставлять в нужные места текста документа значения из Delphi?

Там есть исходники.
В исходниках можно посмотреть, как втыкает текст в нужное место с помощью объекта "надпись".

А в тексте статьи есть пример, как вставить текст в то место, где заранее стоит закладка.

Поля MS Word Найти похожие ветки