anchor.diff:              DoSave;
               MsgBox(Format(msgCannotSaveFileWithEnc, [OldEncoding]), MB_OK or MB_ICONWARNING);
             end;
  -        on E: EWriteError do
  +        on E: EFileNotFoundException do
             begin
               MsgBox(msgCannotSaveFile+#10+AFileName, MB_OK or MB_ICONERROR);
               exit(false);
  
positive.code:       Ed.EndUpdate;
      end;
      AppFileAttrRestore(AFileName, OldAttr);
      Break;
    except
      if MsgBox(msgCannotSaveFile+#10+AFileName,
        MB_RETRYCANCEL or MB_ICONERROR) = IDCANCEL then
      begin
        Result:= false;
        Break;
      end;
    end;
  end;
  
  
negative.code: var
    OldEncoding: string;
    OldAttr: Longint;
  begin
    Result:= true;
    while true do
    try
      AppFileAttrPrepare(AFileName, OldAttr);
  