anchor.diff:        else
           Canvas.Color := clInactiveSel;
       end
  -    else Canvas.Color := clListBox;
  +    else
  +      Canvas.Color := clListBox;
   
       Canvas.FillRectangle(ItemRect);
       Exclude(PaintPart, lvppBackground);
  
positive.code: {
      fpGUI  -  Free Pascal GUI Toolkit
  
      Copyright (C) 2006 - 2008 See the file AUTHORS.txt, included in this
      distribution, for details of the copyright.
  
      See the file COPYING.modifiedLGPL, included in this distribution,
  
negative.code:           tLeft := ItemRect.Left;
            tWidth := Canvas.Font.TextWidth(TheText);
            case FColumns.Column[J].Alignment of
              taRightJustify:
                  Inc(tLeft, FColumns.Column[J].Width - tWidth - 5);
              taCenter:
                  Inc(tLeft, (FColumns.Column[J].Width - tWidth - 5) div 2);
              taLeftJustify:
                  Inc(tLeft, 5);
            end;
  
            fpgStyle.DrawString(Canvas, tLeft, ItemRect.Top+2, TheText, Enabled);
  