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