更改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;