Главная страница
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.48 MB
Время: 0.054 c
3-1099555798
Kat
2004-11-04 11:09
2004.12.05
Нужно ли ставить скобки в SQL, если используем AND ?


14-1100757653
sniknik
2004-11-18 09:00
2004.12.05
Разминка к пятнице, легкая задачка на четверг...


14-1100756936
gn
2004-11-18 08:48
2004.12.05
Билл Гейтс: пароль мертв


14-1100692895
Ega23
2004-11-17 15:01
2004.12.05
А что есть OnClick?


14-1100161326
Delph
2004-11-11 11:22
2004.12.05
Компанент для работы с настройками дисплея