Mehrere Word Dateien zusammenfügen

[AgentAS]

Hallo zusammen,

hat ja nichts mit der Frage meines Vorschreibers zu tun, ist aber auch eine Frage auf Word bezogen. Möchte gerne Word aus Delphi heraus drucken können, ohne in Word den Druckenbutton zu betätigen.
Hier der Quellcode.

Delphi-Quellcode:

    try
      word := CreateOleObject('Word.Application');
    except
      ShowMessage('Word konnte nicht gestartet werden!');
    end;
    
    word.Visible := True;
    word.Documents.Open(FileName := ExtractFilePath(ParamStr(0)) + 'BEGLEITSCHREIBEN-   RECHTSANWALT.doc');

    word.ActiveDocument.FormFields.Item('Name').Result := CBRechtsA.Text;
    word.ActiveDocument.FormFields.Item('Strasse').Result := EditRechtsAStrasse.Text;
    word.ActiveDocument.FormFields.Item('Plz').Result := EditRechtsAPLZ.Text;
    word.ActiveDocument.FormFields.Item('Ort').Result := EditRechtsAOrt.Text;
    word.ActiveDocument.FormFields.Item('Datum').Result := DatetoStr(Date);
    word.ActiveDocument.FormFields.Item('Mandant').Result := EditVName.Text + ' ' + EditName.Text;
    word.ActiveDocument.FormFields.Item('GaNr').Result := EditGaNr.Text;

Hab schon in der Hilfe geschaut finde aber nichts.

Gruß

Andreas