Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Вниз

Перерисовка 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.03 c
3-1099915106
SergP
2004-11-08 14:58
2004.12.05
Как узнать находится ли dataset в режиме insert или edit?


1-1101112187
Ega23
2004-11-22 11:29
2004.12.05
TRxSpeedButton в триггерном режиме


1-1100825047
dolphin
2004-11-19 03:44
2004.12.05
stringgrid


3-1099827234
naum
2004-11-07 14:33
2004.12.05
Пробежка по всей базе MS Access (mdb)


14-1100603568
BorisUK
2004-11-16 14:12
2004.12.05
Задачка для второго класса церковно-приходской школы, придуманная





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский