////////////////////////////////////////////////////////////////////////////
//hsr
CustomDrawItem 이벤트에서 아래와 같이 넣어보세요
procedure TForm1.TreeView2CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var
Rect : TRect;
begin
if cdsSelected in State then begin
with (Sender as TTreeView).Canvas do begin
Brush.Color := clActiveCaption;;
FillRect(Rect);
end;
end;
end;
==> 안녕하세요...
기본적으로 선택된 노드가 파란색으로 되지는 않습니다. 혹시 Node가 Highlight 된다는것을 의미하는것 같네요... 선택된 노드가 포커스 이동으로 보이지 않아서 문제라면.. HideSelection Property를 False 로 바꿔보시면 Highlight 는 아니지만.. Selection Node는 구분할 수 있습니다.
만약 포커스가 이동해도 Highlight 된것 처럼 보이기시길 원하시면 OwnerDraw를 하셔서 직접 배경과 폰트 색을 지정해서 그려주시면 됩니다.
////////////////////////////////////////////////////////////////////////////
//hsr
CustomDrawItem 이벤트에서 아래와 같이 넣어보세요
procedure TForm1.TreeView2CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var
Rect : TRect;
begin
if cdsSelected in State then begin
with (Sender as TTreeView).Canvas do begin
Brush.Color := clActiveCaption;;
FillRect(Rect);
end;
end;
end;