Fórum Como exibir itens em cores diferentes em um TreeView #248116
25/08/2004
0
Tenho um TreeView onde mostro todos os módulos de meu sistema para o administrador liberar/bloquear para determinado usuário. Meu cliente me pediu para exibir os módulos que estáo liberados em cor diferente dos que estão bloqueados no treeview. Alguém sabe como devo proceder para fazê-lo?
Muito obrigado.
Eniosb
Curtir tópico
+ 0Posts
25/08/2004
Motta
O modo mais fácil é no evento CustomDrawItem
procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if item.Index mod 2 0 then begin
(Sender as TCustomListView).Canvas.Font.Color:= clGreen;
(Sender as TCustomListView).Canvas.Font.Size:= 13;
(Sender as TCustomListView).Canvas.Font.Name:=´Times New Roman´;
(Sender as TCustomListView).Canvas.Font.Style:= [fsBold, fsItalic];
end else
(Sender as TCustomListView).Canvas.Font.Color:= clBlue
end;
Gostei + 0
25/08/2004
Macario
Gostei + 0
25/08/2004
Eniosb
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)