Цвет фокуса в TreeView

← →
VZ_Alexandr (2002-12-10 10:40) [0]

Здравствуйте.
Как можно сменить цвет (фокус) выделение узла в TreeView. А то у меня фон не очень.

← →
Дмитрий К.К. © (2002-12-10 12:38) [1]

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if cdsFocused in State then Sender.Canvas.Brush.Color := clRed else
Sender.Canvas.Brush.Color := clBlue;
end;

Цвет фокуса в TreeView Найти похожие ветки