anchor.diff:    C.FillRect(ARect);
   
     //paint full-width area of current view
  -  R1:= GetItemRect(Ed.LineTop, Ed.LineBottom, true);
  -  R1.Right:= ARect.Right;
  +  R1:= GetItemRect(0, Ed.LineTop, Ed.LineBottom, markFull);
   
     C.Brush.Color:= GetAppColor('EdMicromapViewBg');
     C.FillRect(R1);
  
positive.code:   ed.OptUnprintedVisible:= EditorOps.OpUnprintedShow;
    ed.OptRulerVisible:= EditorOps.OpRulerShow;
    ed.OptScrollbarsNew:= true;
  
    ed.OnClick:= @EditorOnClick;
    ed.OnClickDouble:= @EditorOnClickDouble;
  
negative.code:     Caret:= Ed.Carets[i];
      Caret.GetSelLines(NLine1, NLine2, false);
      if NLine1<0 then Continue;
      R1:= GetItemRect(0, NLine1, NLine2, markRight);
      C.FillRect(R1);
    end;
  
  