请教：有关ListView如何才能更改某一行的颜色？

Question

请教：ListView如何才能更改某一行的颜色？
我用ListView显示一些记录信息，想要实现的是把选中行的颜色变为红色。
请问该如何实现呢？？？

Answer 1

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
    if cdsSelected In State then
    begin
        Sender.Canvas.Brush.Color := clYellow;
        Sender.Canvas.Font.Color := clRed;
    end;
end;

Answer 2

如果我把ListView的RowSelect改为True，上述代码就无效了。
有解决方法吗