Worddocument in Delphi mit Text füllen und formatieren

[toms]

ungetestet:

Delphi-Quellcode:

 var 
   fpage,pagea: OleVariant;
 begin 
　　fpage := True;
　　pagea := wdAlignPageNumberCenter;
　　Wordapplication1.ActiveDocument.sections.item(1).Footers.item(1).PageNumbers.Add(pagea, fpage);
 end;