Moin!
Ansonsten noch ein Tipp: Nach dem Ausführen des SaveDialoges enthält die Options Eigenschaft das gesetzte Flag ofExtensionDifferent, wennd er Nutzer trotz allen anderem eine anderen Endung angegeben hat als in der DefaultExt eingetragen wurde. Da ich in meinem Programm nur eine Endung zulasse habe ich das so gelöst:
Delphi-Quellcode:
If ( dlg_BIBSaveNew.Execute ) Then
Begin
lFN := dlg_BIBSaveNew.FileName;
If ( ofExtensionDifferent In dlg_BIBSaveNew.Options ) Then
lFN := ChangeFileExt(lFN, '.bib');
Nur mal so als Tipp/Hinweis...
MfG
Muetze1