Olá galera, nesta Quick Tips, irei mostrar os novos recursos que foram adicionados na ListView do Delphi 2009, e também presentes no Delphi 2010. Além de configurarmos a exibição dos Itens da ListView como vsIcon, vsSmallIcon, vsList,vsReport, podemos agora criar grupos, isso mesmo grupos, assim como os sistemas operacionais evoluem as ferramentas de desenvolvimento também tendem a evoluir para acompanhar, podemos ver um ListView no Windows 7,veja abaixo um exemplo
Podemos notar os itens que são as unidas de Disco e unidade de DVD-RW, e também estão classificadas em dois grupos como ilustrado na imagem anterior.
Agora vamos implementar isso em nossa boa e velha ListView. Adicione em uma nova aplicação :
- 1 ImageList (Configure o Width = 32 e Height = 32, adicione 10 imagens do tamanho 32 por 32) renomei o mesmo para Img32x32
- 1 ImageList (Configure o Width = 32 e Height = 32, adicione 3 imagens do tamanho 32 por 32) renomei o mesmo para ImgHeader
- 1 ListView
Vamos agora criar os grupos inicialmente antes de criar os Itens para fazer tudo de uma única vez tornando o exemplo mais prático.
Adicionando os grupos no ListView
- Localize a propriedade Groups adicione 3 Itens, mudando a propriedade Header para Linguagens, Bancos de Dados, Sistemas Operacionais, selecione o TitleImage onde serão listados 3 itens referentes ao componente ImgHeader, observe que foi marcado para true o lgsCollapsible pois ele permitirá ocultar o grupo caso necessário.
Diversas outras opções podem ser configuradas ao selecionar um item do grupo.
Adicionando os itens no ListView
- Localize a propriedade LargeImages e aponte para o Img32x32
- Localize a propriedade GroupHeaderImages e aponte para o ImgHeader
- Localize a propriedade Items e adicione 10 Itens, como mostra a figura abaixo, selecione também o Group ao qual cada item pertence, e também uma imagem para representar o mesmo.
- Localize a propriedade GroupView e coloque True
Executando a aplicação podemos ver os efeitos como mostra o exemplo abaixo. Podemos notar que as linguagens estão ocultas justamente porque a propriedade lgsCollapsible foi marcada como True;
Fico por aqui ate à próxima Quick Tips.
Um abraço
Wesley Y
wyamazack@rwsolution.com.br