DELPHI中的LISTVIEW构件怎样设置指定一行的背景颜色
编号：QA002290
建立日期: 1999年12月20日 最后修改日期：1999年12月20日
所属类别：
Element:
编程工具: Delphi 5
操作系统: WinNT
DELPHI中的LISTVIEW构件怎样设置指定一行的背景颜色？
回答:
Delphi的一个很强的功能就是其自绘能力，这可以被用来解决这个问题。Delphi 3.0没有提供ListView的自绘事件，但可以从http://www.pobox.com/~bstowers/delphi/下载TExtListView & TEnhListView控件，安装了该控件后Delphi的TEnhListView就可以提供自绘事件。这个控件是免费的，并提供全部源程序。Delphi 4.0以上版本的用户不必安装这个控件，因为Delphi 4.0以上版本提供了自绘事件。Delphi 4.0以上版本，自绘事件为CustomDrawItem，下面是自绘事件代码：
procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var b: Boolean;
begin
b := Boolean(Item.Data^);
if b then
Sender.Canvas.Brush.Color := clRed;
end;
此问题由李海回答。
| |
|
|
| |
|
|
