Rewrite(f) findet File nicht...

[calibra301]

Komisches Verhalten...

In einem Programm werden regelmässig nach schliessen eines Settings - Dialoges
Daten weggespeichert.
Die Prüfung ob File offen oder existiert schlägt nicht an.
Nur die Rewrite - Exception kommt mit einem "EIOnOutError, Datei nicht gefunden.." und ein 0Kb File bleibt.

Mal geht's X mal gut, dann wieder nicht.

Delphi-Quellcode:

function  CDevice.storeSettings(name: string) : integer;
var i:integer;
    f: file of TSettingsFile;
    s: TSettingsFile;
begin
  storeSettings := -1;
   try
    if IsFileInUse (name) then
    Begin
      MessageDlg('File '+name+' is open !!', mtInformation,  [mbOk], 0);
    end;
     AssignFile(f, name);

    if not fileexists (name) then
    Begin
      MessageDlg(' Gibts nicht !!', mtInformation,  [mbOk], 0);
    end;

     rewrite(f);
  except
    exit;
  end;
  //...diverses Speichern
  Closefile(f)

Suche seit Tagen einen sicher eigenen Fehler und sehe meinen eigenen Blödsinn nicht.
Kann es mit der typisierten Datei zusammen hängen ?