Einzelnen Beitrag anzeigen

norwegen60

Registriert seit: 23. Dez 2007
Ort: Schwarzwald
505 Beiträge
 
Delphi 12 Athens
 
#1

TWordDocument erwarteter Dateiendung ermitteln

  Alt 21. Apr 2016, 16:25
Hallo zusammen,

ich öffne über TWordDocument eine Word-Dokumentvorlage (im Moment noch *.dot), fülle diese aus und speichere diese mit
Delphi-Quellcode:
sFileName := 'c:\tmp\test'
WordDocument1.SaveAs(sFileName, wdFormatDocument);
Das Dokument wird mit Office2007 als test.doc gespeichert
Wenn ich den Parameter auf WordDocument1.SaveAs(sFileName, 16); ändere, (16 ist lt. VBA der Paramerter wdFormatDocumentDefault, den Delphi XE10 aber nicht kennt), wird das Dokument als test.docx gespeichert.

Da ich automatisch speichere will ich vorher prüfen, ob die Datei schon existiert.
Gibt es eine Möglichkeit vor dem SavAs zu prüfen, mit welcher Dateiendung das Word-Dokument gespeichert werden wird?

Programmiert mit Delphi XE10
Soll funktionieren mit Office 2003 - ....

Grüße
Gerd
  Mit Zitat antworten Zitat