如何编写,listview所选择项为蓝色

解决方案 »

  1.   

    晕死,来来就是蓝色的呀,
    要全行都蓝设RowSelect=true
      

  2.   

    不好意思,没有说明白,我是指当用户点击listview中的某一项时,这一项的被景色为设为蓝色,当移开listview时,listview中的那一项的蓝色还在.这有变于用户上一次是点击的那一项.
      

  3.   

    listview控件有个HideSelection属性,设置为True后,会使得当你点其他控件时,出现会色阴影。但想要实现你的要求的话,只能是在OnCustomDrawItem等自画事件中写代码了。
      

  4.   

    procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
      Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
    begin
      if Integer(Item.Data)=1 then
        ListView1.Canvas.Font.Color := clBlue;
    end;procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
      Selected: Boolean);
    begin
      Item.Data := Pointer(1);
    end;