| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Присвоение значения закладке в Word

syte_ser78 ©   (2005-01-18 12:23:00) 

Подскажите плиз, как присвоить значение существующей закладке в Ворд?

Пример кода на VBA

...
   Selection.HomeKey Unit:=wdStory
   Selection.GoTo What:=wdGoToBookmark, Name:="N1"
   Selection.TypeText Text:=Format(CStr(N), "0.00")
   Selection.GoTo What:=wdGoToBookmark, Name:="P1"
   Selection.TypeText Text:=CStr(P)
   Selection.GoTo What:=wdGoToBookmark, Name:="D1"
   Selection.TypeText Text:=CStr(D)
...

---

k2   (2005-01-18 14:25:00) [1]


var
 wd: WordApplication;
 bmname: OleVariant;
begin
 wd := GetActiveOleObject('Word.Application')as WordApplication;
 bmname := 'param1';
 wd.ActiveDocument.Bookmarks.Item(bmname).Range.Text := 'BookmarkParam1FoundHere'
end;


---

Наверх