Le premier site francophone dédié au développement Pocket PC

Comment utiliser le contrôle ListView ? (partie 4)

Dans cette 4ème et dernière partie, nous allons faire un tour des différentes méthodes et propriétés qui permettent une gestion fine du ListView.

EnsureVisible (méthode de ListItem)

L'objet ListItem (une ligne du ListView) peut être rendu visible (si par exemple il est placé trop bas dans la liste) en utilisant la méthode "EnsureVisible". Si nous voulons rendre obligatoirement visible le ListItem n°3 il suffit d'écrire :

Call LV_Trains.ListItems(3).EnsureVisible

Note: Il est possible de retrouver un ListItem par sa clé (Key), pour peut qu'on l'ait précisé lors de sa création.

Selected (propriété de ListItem)

Il est possible de sélectionner par programme un ListItem en lui plaçant sa propriété "Selected" à Vrai (True) comme si l'utilisateur l'avait fait lui-même. En lisant cette propriété, on peut savoir si le ListItem est sélectionné, car si vous placez la propriété "MultiSelect" du ListView à Vrai (True) vous pouvez avoir plusieurs ListItems sélectionnés à la fois, et le seul moyen de savoir lesquels sont sélectionnés.

SelectedItem (propriété de ListView)

Cette propriété retourne le ListItem qui a été selectionné en dernier (attention, c'est un objet, on l'utilise avec le mot clé "Set") :

Dim wItem As ListItem
Set wItem = LV_Trains.SelectedItem

MultiSelect (propriété de ListView)

En plaçant cette propriété à Vrai (True), vous autorisez la sélection de plusieurs ListItem à la fois.

StartLabelEdit (méthode de ListView)

Lance le mode édition sur le ListItem sélectionné (ou le dernier à avoir été sélectionné en cas de multisélections).

GetFirstVisible (méthode de ListView)

Cette méthode retourne l'objet ListItem (attention, objet = set) qui est visible en haut de la liste (permet de régler des problèmes de positionnement dus au scrolling de la liste).

Sorted (propriété de ListView)

Si vous placez cette propriété à Vrai (True), les ListItems seront triés par défaut la première colonne. Vous pouvez changer la colonne où s'effectue le trie en plaçant dans la propriété "SortKey" l'index (qui commence à zéro) de la colonne, et dans la propriété "SortOrder" le sens du tri (lvwAscending ou lvwDescending) :

Private Sub listView_ColumnClick(ByVal Index As Long)

Rem On trie dans l'ordre croissant
LV_Trains.Sorted = False
LV_Trains.SortKey = Index - 1
LV_Trains.SortOrder = lvwAscending
LV_Trains.Sorted = True

End Sub

Voilà, nous avons terminé notre serie d'articles sur le contrôle ListView. Si vous avez des questions, ou des problèmes, n'hésitez pas à utiliser les forums iPAQdev.

Stéphane Sibué