Как добавить текст в footer документа?

Материал из DRKB


"Подвал" документа:

aDoc := WordApp.Documents.Add(EmptyParam, EmptyParam);
aDoc.Sections.Item(1).Footers.Item(wdHeaderFooterPrimary).Range.Text := 'This is a footer';


Source: Взято с Delphi Knowledge Base: http://www.baltsoft.com/
ID: 04427