TSave Dialog Exception

[Sir Rufo]

Delphi-Quellcode:

function Speichern : Boolean;
begin
  Result := False;  // Erst mal den Rückgabewert auf False, wer weiß was alles passieren kann :o)

  if MeinSaveDialog.Execute then // Ich soll also wirklich speichern
    begin
      // Hier kommt jetzt der Block zum Speichern
      ...
      // Wenn dieser Block komplett ohne Fehler abgeschlossen wurde, dann ist die Datei wohl gespeichert
      Result := True;
    end;

end;