Zitat von
Grolle:
Allerdings speichert das Prog die Datei jetzt ganz ohne Endung?
Das ist bei Deinem Beispiel korrekt. Denn der Befehl
ChangeFileExt(SaveDialog1.FileName,'.txt');
entfernt nur die Dateierweiterung. Der Teil '.txt' bleibt unberücksichtigt. In Deinem Beispiel musst Du
SaveDialog1.FileName := ChangeFileExt(SaveDialog1.FileName,'.txt');
nehmen. Dann wird eine vorhandene Dateierweiterung entfernt und '.txt' angehängt.
PS: Habe es mit Delphi 3 Professional überprüft und es funktioniert.