savedialog Datentyp

[Zeb22]

Zitat von Satty67:

try dateispeichern except dateiErstellen; dateiSpeichern;

ist das nicht besser?

Delphi-Quellcode:

procedure TForm1.dateiSpeichern(datei : String);
begin
  AssignFile(datei, verz);
  {$I-}
  if FileExits(datei) then
    reset(datei)
  else
    rewrite(datei);
  {$I-}
  if IOResult = 0 then
    write(datei,tw)
  else raise // Eigene oder Standard Exception
  CloseFile(datei);
end;

if FileExits(datei, verz); wird bei mir als Fehler angezeigt. Gibt es FileExits überhaupt?