Einzelnen Beitrag anzeigen

AJ_Oldendorf

Registriert seit: 12. Jun 2009
385 Beiträge
 
Delphi 12 Athens
 
#3

AW: Word-Datei einbinden, bearbeiten, speichern

  Alt 23. Jun 2021, 12:39
Danke, die Pas-Datei kannte ich noch gar nicht

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin

  try
    WordApp.Documents.Open('D:\Test1.docx');

  finally

  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  WordApp.ActiveDocument.SaveAs('D:\Test2.docx');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  WordApp := CreateOLEObject('Word.Application');
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  WordApp := Unassigned;
end;
Damit kann ich eine Datei öffnen und wieder abspeichern.
Komischerweise bleibt am Ende aber immer die Tilde-Datei der Test2.docx vorhanden und die Test2.docx scheint von irgendeinem Prozess in Verwendung zu sein, weil ich sie auch nicht löschen kann im Explorer.
  Mit Zitat antworten Zitat