anchor.diff:      FCheckFilenameOpened: TStrFunction;
       FOnMsgStatus: TStrEvent;
       FSaveDialog: TSaveDialog;
  +    FReadOnlyFromFile: boolean;
   
       procedure BinaryOnKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
       procedure BinaryOnScroll(Sender: TObject);
  
positive.code:     function Editor2: TATSynEdit;
      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;
  
negative.code:   c.SetValue(path+cHistory_Enc, EncodingName);
    c.SetValue(path+cHistory_Top, Editor.LineTop);
    c.SetValue(path+cHistory_Wrap, Ord(Editor.OptWrapMode));
    if not ReadOnlyFromFile then
      c.SetValue(path+cHistory_RO, ReadOnly);
    c.SetValue(path+cHistory_Ruler, Editor.OptRulerVisible);
    c.SetValue(path+cHistory_Minimap, Editor.OptMinimapVisible);
    c.SetValue(path+cHistory_Micromap, Editor.OptMicromapVisible);
  