anchor.diff:    pnt:= Point(ARect.Left+cIndent, ARect.Top+1);
     c.TextOut(pnt.x, pnt.y, Utf8Encode(strname));
   
  -  c.Font.Color:= GetAppColor('ListFontHilite');
  +  c.Font.Color:= FColorFontHilite;
   
     if UiOps.ListboxFuzzySearch and not DisableFuzzy then
     begin
  
positive.code:     if not FMultiline then
        c.FillRect(pnt.x-2, pnt.y, list.ClientWidth, pnt.y+list.ItemHeight-1);
  
      c.Font.Color:= GetAppColor('ListFontHotkey');
      c.TextOut(pnt.x, pnt.y, Utf8Encode(strkey));
    end;
  end;
  
negative.code:   if AIndex<0 then exit;
    if AIndex=list.ItemIndex then
    begin
      c.Font.Color:= FColorFontSel;
      cl:= FColorBgSel;
    end
    else
    begin
      c.Font.Color:= FColorFont;
      cl:= FColorBg;
    end;
    c.Brush.Color:= cl;
    c.Pen.Color:= cl;
  