更改treeview节点颜色

Question

有什么方法可以更改TTreeView中节点的颜色。我想用深色为我的树视图着色，然后看不到节点。

alt text http://rigo.ro/temp/ChangeTreeViewNodeColor.png

Answer 1

这是不容易明显，你只想要更改线条颜色。 无论如何，API中有一条消息。

uses 
    commctrl; 

procedure TForm1.FormCreate(Sender: TObject); 
begin 
    SendMessage(TreeView1.Handle, TVM_SETLINECOLOR, 0, ColorToRGB(clYellow)); 
end; 

Answer 2

也许你可以使用OnCustomDrawItem事件TTreeView的：

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView; 
    Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean); 
begin 
    with Sender as TCustomTreeView do 
    begin 
    Canvas.Brush.Color := clBlack; 
    Canvas.Font.Color := clBlack 
    end; 
end;