Как добавить текст в footer документа?
01.01.2007
Footer:
{ ... } aDoc := WordApp.Documents.Add(EmptyParam, EmptyParam); aDoc.Sections.Item(1).Footers.Item(wdHeaderFooterPrimary).Range.Text := 'This is a footer'; { ... }
Взято с Delphi Knowledge Base: https://www.baltsoft.com/