anchor.diff:    Obj: TATLinePartClass;
   begin
     Ed:= Sender as TATSynEdit;
  -  if Ed.Strings.Count=0 then exit;
  -  //NPixelOffset:= Ed.ScrollVert.NPixelOffset;
  +  St:= Ed.Strings;
  +  if St.Count=0 then exit;
     NWidthSmall:= EditorScale(EditorOps.OpMicromapWidthSmall);
   
     C.Brush.Color:= GetAppColor('EdMicromapBg');
  
positive.code:   NColorSpell:= GetAppColor('EdMicromapSpell');
  
    //paint line states
    for i:= 0 to Ed.Strings.Count-1 do
    begin
      State:= Ed.Strings.LinesState[i];
      case State of
        cLineStateNone: Continue;
        cLineStateAdded: NColor:= Ed.Colors.StateAdded;
  
negative.code:   end;
  //
  var
    St: TATStrings;
    NColor: TColor;
    Caret: TATCaretItem;
    State: TATLineState;
  