Messagebox soll nur erscheinen, wenn datei gespeichert wurde

[Bummi]

Delphi-Quellcode:

if SaveDialog1.Execute then
     begin        
             theStringList.savetofile(SaveDialog1.Filename);
             MessageDlg('Die Kundendatenbank wurde erfolgreich exportiert!', mtInformation, [mbOK],0);
     end;