Colorir TreeView
Estou tentando colorir as linhas de um treeview.
por exemplo se na linha tiver a palavra ´Cancelado´ ela aperecera em vermleho, se tiver ´Ativado´ aparecera em azul e se tiver a palavra ´Revisito´ em amarelo...
mas por pode ter os tres na mesma linha assim.
Ativado em 01/09/2005 / Cancelado em 02/09/2005 / Revisto em 05/09/2005
[color=blue:2a7a438de5]Ativado em 01/09/2005[/color:2a7a438de5] / [color=red:2a7a438de5]Cancelado em 02/09/2005[/color:2a7a438de5] / [color=yellow:2a7a438de5]Revisto em 05/09/2005[/color:2a7a438de5].
aparentemente tudo estaria certo.
mas o texto sempre aparece com a primeira cor, no exemplo acima aparece tudo em azul
[color=blue:2a7a438de5]Ativado em 01/09/2005 / Cancelado em 02/09/2005 / Revisto em 05/09/2005[/color:2a7a438de5].
estou utilizando o evento OnAdvancedCustomDrawItem com a propriedade Stage setada como cdPostPaint, coloca o defaultdraw como false e acontece esse erro.
alguem pode me ajugar?
por exemplo se na linha tiver a palavra ´Cancelado´ ela aperecera em vermleho, se tiver ´Ativado´ aparecera em azul e se tiver a palavra ´Revisito´ em amarelo...
mas por pode ter os tres na mesma linha assim.
Ativado em 01/09/2005 / Cancelado em 02/09/2005 / Revisto em 05/09/2005
[color=blue:2a7a438de5]Ativado em 01/09/2005[/color:2a7a438de5] / [color=red:2a7a438de5]Cancelado em 02/09/2005[/color:2a7a438de5] / [color=yellow:2a7a438de5]Revisto em 05/09/2005[/color:2a7a438de5].
aparentemente tudo estaria certo.
mas o texto sempre aparece com a primeira cor, no exemplo acima aparece tudo em azul
[color=blue:2a7a438de5]Ativado em 01/09/2005 / Cancelado em 02/09/2005 / Revisto em 05/09/2005[/color:2a7a438de5].
estou utilizando o evento OnAdvancedCustomDrawItem com a propriedade Stage setada como cdPostPaint, coloca o defaultdraw como false e acontece esse erro.
alguem pode me ajugar?
Night_man
Curtidas 0
Respostas
Anicetojunior
10/10/2005
No evento onCustomDrawItem coloque o seguinte
if node.Text = ´CANCELADO´ then
(Sender as TCustomTreeView).Canvas.Font.Color:= clrede
else if if node.Text = ´REVESTIDO´ then
//faz algo
e assim por diante, agora vc pode melhora-la p/ lhe atender melhor
if node.Text = ´CANCELADO´ then
(Sender as TCustomTreeView).Canvas.Font.Color:= clrede
else if if node.Text = ´REVESTIDO´ then
//faz algo
e assim por diante, agora vc pode melhora-la p/ lhe atender melhor
GOSTEI 0