Как перерисовать один NODE in TTreeView без изменения текста

← →
cdadmitriy (2004-06-22 15:07) [0]

← →
cdadmitriy (2004-06-22 16:10) [1]

???

← →
Amoeba © (2004-06-22 16:17) [2]

В чем суть проблемы? Задай вопрос по человечески, а то ни черта нельзя понять из-за чего возникла такая необходимость.

← →
cdadmitriy (2004-06-22 17:06) [3]

меняется например TmyD(node.data).stat и по нему
меняется рисовка

procedure TFormView.MyTreeCustomDrawItem(Sender: TCustomTreeView; Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
DefaultDraw:=true;
if Node.Data<>Nil Then if (TMyD(Node.Data).FStat)=WorkStatus Then
if Node.Level=0 Then Sender.Canvas.Brush.Color:=clLime else Sender.Canvas.Brush.Color:=$78D964;
end;

Может быть, WM_DRAWITEM.

← →
cdadmitriy (2004-06-23 08:46) [5]

???

Как перерисовать один NODE in TTreeView без изменения текста Найти похожие ветки