anchor.diff:                  XColor.FromColor(LinePartObj.Data.ColorBG)
                 else
                   XColor.FromColor(LinePartObj.Data.ColorBorder);
  -              R1:= GetItemRect(NIndex, NLine1, NLine2, markColumn);
  -              FMicromapBmp.FillRect(R1, XColor);
  +              RectMark:= GetItemRect(NIndex, NLine1, NLine2, markColumn);
  +              FMicromapBmp.FillRect(RectMark, XColor);
               end;
             end
             else
             if LinePartObj.ColumnTag=cTagColumnFullsized then
             begin
  -            R1:= GetItemRect(0, NLine1, NLine2, markFull);
  +            RectMark:= GetItemRect(0, NLine1, NLine2, markFull);
               //todo: not tested with BGRABitmap - it must give inverted colors
               XColor.FromColor(LinePartObj.Data.ColorBG);
  -            FMicromapBmp.FillRect(R1, XColor, dmDrawWithTransparency, $8000);
  +            FMicromapBmp.FillRect(RectMark, XColor, dmDrawWithTransparency, $8000);
             end;
           end;
         end;
  
positive.code:     FMicromapBmp:= TBGRABitmap.Create;
    FMicromapBmp.SetSize(ARect.Width, ARect.Height);
  
    RectMap:= Rect(0, 0, ARect.Width, ARect.Height);
  
    XColor.FromColor(GetAppColor(apclEdMicromapBg));
    FMicromapBmp.Fill(XColor);
  
    //paint full-width area of current view
    R1:= GetItemRect(0, Ed.LineTop, Ed.LineBottom, markFull);
  
    XColor.FromColor(GetAppColor(apclEdMicromapViewBg));
    FMicromapBmp.FillRect(R1, XColor);
  
    XColorSelected.FromColor(Ed.Colors.TextSelBG);
    XColorOccur.FromColor(GetAppColor(apclEdMicromapOccur));
  
negative.code:     case Marker.Tag of
        cTagSpellChecker:
          begin
            RectMark:= GetItemRect(1{column_1}, NLine1, NLine2, markColumn);
            FMicromapBmp.FillRect(RectMark, XColorSpell);
          end;
        cTagOccurrences:
          begin
            RectMark:= GetItemRect(1{column_1}, NLine1, NLine2, markColumn);
            FMicromapBmp.FillRect(RectMark, XColorOccur);
          end;
        else
          begin
  