procedure TForm1.TreeView1CustomDrawItem(Sender:TCustomTreeView;
Node:TTreeNode;State:TCustomDrawState;varDefaultDraw: Boolean);
begin
if cdsSelected in State then
TreeView1.Canvas.Font.Color:=clRed;
end;
如果TreeView失去焦点,无法保持选中节点的背景色,如下设置:
HideSelection设为false。