Fehler bei Abbruch des Savedialogs

[WHaase]

Hallo Leute,

bei mir stellt sich ein Problem ein, wenn ich versuche Daten mit dem unten angegebenen Savedialog zu speichern.

Das Problem tritt auf, wenn ich den Savedialog während der Ausführung abbreche. Dann erhalte ich eine Fehlermeldung. Offensichtlich ist der Abbruch nicht vorgesehen und in meinem Code nicht abgefangen.

Weiss da jemand Abhilfe?

Mein Code:
with SaveDialog1 do begin
FileName:=SaveDialog1.FileName ;
Filter:= 'Text-File (*.txt)|*.txt';
DefaultExt:= '*.txt';
If Execute then begin
assignfile(f,Filename);
rewrite(f);
end;
end; // End with SaveDialog1 do begin