Hallo zusammen,
möchte gerne Word aus Delphi heraus drucken können, ohne in Word den Druckenbutton zu betätigen, oder Word zu starten!
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
Nichts wissen ist auch eine Art Wissen.