anchor.diff:      procedure EditorOnKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
       property ReadOnly: boolean read GetReadOnly write SetReadOnly;
       property FileName: string read FFileName write SetFileName;
  +    property FileWasBig: boolean read FFileWasBig write SetFileWasBig;
       property TabCaption: string read FTabCaption write SetTabCaption;
       property TabImageIndex: integer read FTabImageIndex write SetTabImageIndex;
       property TabCaptionFromApi: boolean read FTabCaptionFromApi write FTabCaptionFromApi;
  
positive.code:     procedure SetEnabledFolding(AValue: boolean);
      procedure SetEncodingName(const Str: string);
      procedure SetFileName(const AValue: string);
      procedure SetLocked(AValue: boolean);
      procedure SetNotifEnabled(AValue: boolean);
      procedure SetNotifTime(AValue: integer);
  
negative.code:     exit
    end;
  
    //turn off opts for huge files
    FileWasBig:= Editor.Strings.Count>EditorOps.OpWrapEnabledMaxLines;
  
    SetLexer(DoLexerFindByFilename(fn));
    if AAllowLoadHistory then
      DoLoadHistory;
    UpdateReadOnlyFromFile;
  
    NotifEnabled:= UiOps.NotifEnabled;
  end;
  
  procedure TEditorFrame.UpdateReadOnlyFromFile;
  