anchor.diff:    FuzzyResults: TATIntArray;
     buf, part_L, part_R: string;
     s_name, s_name2, s_right, s_filter: UnicodeString;
  +  s_name_ansi: string;
     cl: TColor;
     pnt: TPoint;
     RectClip: TRect;
  
positive.code: 
    c.Font.Color:= FColorFontHilite;
  
    bFound:= STextListsFuzzyInput(
               s_name,
               s_filter,
               WordResults,
               FuzzyResults,
  
negative.code:     begin
        for i:= 0 to WordResults.MatchesCount-1 do
        begin
          buf:= Copy(s_name_ansi, WordResults.MatchesArray[i].WordPos, WordResults.MatchesArray[i].WordLen);
          n:= c.TextWidth(Copy(s_name_ansi, 1, WordResults.MatchesArray[i].WordPos-1));
          RectClip:= Rect(
            pnt.x+n,
            pnt.y,
  