anchor.diff:    if bCurrentFuzzy and (s_name<>s_name2) then
       bCurrentFuzzy:= false;
   
  -  pnt:= Point(ARect.Left+cIndent, ARect.Top+1);
  +  pnt:= Point(ARect.Left+IndentFor1stLine, ARect.Top+1);
     c.TextOut(pnt.x, pnt.y, Utf8Encode(s_name2));
   
     c.Font.Color:= FColorFontHilite;
  
positive.code:   if s_right<>'' then
    begin
      if not Multiline then
        pnt:= Point(ARect.Left+List.ClientWidth-cIndent-c.TextWidth(Utf8Encode(s_right)), pnt.y)
      else
        pnt:= Point(ARect.Left+cIndent2, pnt.y+list.ItemHeight div 2);
  
      if not FMultiline then
        c.FillRect(pnt.x-2, pnt.y, list.ClientWidth, pnt.y+list.ItemHeight-1);
  
negative.code: procedure TfmMenuApi.listDrawItem(Sender: TObject; C: TCanvas;
    AIndex: integer; const ARect: TRect);
  const
    IndentFor1stLine = 4;
    IndentFor2ndLine = 10;
  var
    buf, part_L, part_R: string;
    s_name, s_name2, s_right, s_filter: UnicodeString;
  