TWordDocument erwarteter Dateiendung ermitteln

[norwegen60]

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