Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.05;
Скачать: CL | DM;

Вниз

Перерисовка TTreeNode   Найти похожие ветки 

 
Алексей   (2004-11-17 16:38) [0]

Подскажите, плиз, как перерисовать одну ноду в дереве TTreeView.

Задача такая - в зависимости от условия меняю цвет шрифта. Далее ноду нужно перерисовать, только ее, а не все дерево.

Пока получается перерисовать все дерево.

Спасибо.


 
cae ©   (2004-11-17 17:14) [1]

Используй InvalidateRect


 
Ken   (2004-11-17 17:16) [2]

OnCustomDrawItem


 
Алексей   (2004-11-17 17:23) [3]

А примерчик какой-нибудь нельзя?

Заранее благодарен.


 
Ken   (2004-11-17 17:59) [4]

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.TreeView1.Items.Add(nil, "node1");
Form1.TreeView1.Items.Add(nil, "node2");
Form1.TreeView1.Items.Add(nil, "node3");
end;

procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
 Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Node.Text = "node2" then TreeView1.Canvas.Font.Color := clRed;
end;

end.


 
Алексей   (2004-11-18 11:18) [5]

Пример понятен, я так и делаю.

Мне нужно заставить перерисовать ноду в определенный момент.
Если сказать TreeView1.Update, то перерисовывается все дерево.
А TreeNode.Update не существует.

Как только ноду перерисовать?

Спасибо.


 
NAlexey ©   (2004-11-18 12:10) [6]

Тебе же >cae ©   (17.11.04 17:14) [1] ответил.



Страницы: 1 вся ветка

Текущий архив: 2004.12.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.031 c
14-1100579946
ocean
2004-11-16 07:39
2004.12.05
Windows Messenger


1-1100685907
Mishenka
2004-11-17 13:05
2004.12.05
NameValueSeparator в TStringList


1-1101048113
Dyusha
2004-11-21 17:41
2004.12.05
Текст в Memo


6-1096607506
Девушка
2004-10-01 09:11
2004.12.05
Програмный пинг


1-1100668340
Frozzen
2004-11-17 08:12
2004.12.05
Дайет совет!!