Delphi-Quellcode:
var lSaveDoc : OleVariant;
var lSaveApp : OleVariant;
var lSaveMail : OleVariant;
begin
lSaveApp := CreateOleObject('Word.Application');
lSaveDoc := lSaveApp.Documents.Open(FileName := FileName);
lSaveMail := lSaveDoc.MailMerge.OpenDataSource(NamCSV);
lSaveDoc.SaveAs2(FileName := DokVerz + '\' + NewFile, FileFormat := 17);
lSaveApp.Quit;
end;
Das funktioniert, es kommt aber immer eine Meldung, die
CSV-Datei sei bereits offen, ob man mit einer Kopie arbeiten wolle. Ausserdem fehlt noch irgendwie die wirkliche Verbindung den abgespeichert wird in der PDF die Vorlage und nicht die Datei mit den Werten aus der
CSV-Datei.