Главная страница
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.023 c
3-1099457896
KisaNetik
2004-11-03 07:58
2004.12.05
Вопрос по SQL при обновлении записи


4-1098200620
crio
2004-10-19 19:43
2004.12.05
Работа со сканером


1-1100968318
Ivolg
2004-11-20 19:31
2004.12.05
ListView


1-1100846847
hgd
2004-11-19 09:47
2004.12.05
Разрешение экрана


3-1099652399
Janb
2004-11-05 13:59
2004.12.05
Что выбрать? Или как сделать?