如何使ListView中的行以不同颜色显示。

[复制链接]
查看11 | 回复9 | 2013-10-30 06:31:45 | 显示全部楼层 |阅读模式
有如许的控件,老兄
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
象ACDsee一样,ListView中的行可以以不合色彩显示。该若何做?
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
我也想知道!!!最好给出原代码!!!http://www.csdn.net/expert/topic/129/129995.shtm
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
Stage: TCustomDrawStage; var DefaultDraw: Boolean);// 下列是使当Listview1掉去focus中,可以使Listview1看上去照样像选中的样子。procedure TForm1.ListView1AdvancedCustomDrawItem( Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;begin if Item = Sender.Selected then beginend; Sender.Canvas.Font.Color := clWhite; Sender.Canvas.Brush.Color := clBlack; end;
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
很多处所可以写 比如OnCustomDrawItembegin If Item.Index mod 20 thenend; Sender.Canvas.Font.Color := clBlue else Sender.Canvas.Font.Color := clBlack;
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
似乎有CustomDraw吧?
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
TCanvas
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
有没有更好的办法。
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
好象不可,用StringGrid试一试,比较麻烦!
               
       
       
                 查看原帖
回复

使用道具 举报

千问 | 2013-10-30 06:31:45 | 显示全部楼层
<img src=\\\"http://wenwen.soso.com/p/20120626/appbig-20120626010424-5454898836171307.gif\\\"></img>
                        Delphi乐园,开发者的家园。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行