ListView sempre com o ultimo item focado

GuGaW · 27 de outubro de 2005

aí galera

como posso fazer para que o listview fique sempre como o foco no ultimo item.

por exemplo, tenho um listview onde vou jogando itens de um pedido, onde o foco e a rolagem sempre ficam no primeiro item. precisso fazer com que na medida que eu for inserindo itens, o foco e a rolagem sempre fiquem la em baixo.

como posso fazer isso?

valeu...

GuGaW

Clemente Silva · 28 de outubro de 2005

É simples.

Sabendo que o Index do último item é igual a quantidae de itens no Listview, faça assim:

Dim UltimoItem As Long
With ListView

UltimoItem = .ListItems.Count

.ListItems(UltimoItem).Selected = True

.ListItems(UltimoItem).EnsureVisible

End With

Porém, um detalhe importante: certifique-se de que a propriedade HideSelection esteja com valor False.

E para melhorar "visualmente" a seleção do item, coloque a propriedade FullRowSelect para True.