关于BCB 的Treeview 选中节点高亮有关问题

问关于Treeview 选中节点高亮问题
Treeview的选中节点，高亮显示。
但在失去焦点的时候，不显示
如果设置了TreeView.HideSelection:=False;
则在失去焦点的时候为灰色显示
现在我希望在失去焦点的时候依然可以普通的高亮显示，如windows默认的蓝色，
请问该如何做。谢谢

------解决方案--------------------------------------------------------

Delphi(Pascal) code

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
  Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  if node.Selected then
  begin
    TreeView1.Canvas.Brush.Style := bsSolid;
    TreeView1.Canvas.Brush.Color := clRed;
  end;
end;

------解决方案--------------------------------------------------------
的确，那个是太暗了一些
自画又觉得太大动干戈了一点

摘自：http://martian6125.blog.163.com/blog/static/142172932013215105447192/