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

Вниз

Использую TWordDocument. Как заполнить колонтитулы?   Найти похожие ветки 

← →
Nobody2002   (2004-01-15 12:59) [0]

Использую TWordDocument. Как внести какую-либо строку в колонтитулы?

---

← →
Dimman1 ©   (2004-01-15 13:27) [1]

Тебе короче надо вот эту фигню на дельфи перетянуть (это типа листинг макроса на VB, колонтитул сделать). Надеюсь разберешься.

If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.TypeText Text:="blablabla"
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

Удачи.

---

← →
Nobody2002   (2004-01-15 14:16) [2]

Спасибо, попробую

---

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

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

Наверх

Память: 0.46 MB
Время: 0.01 c