[ListView] : petite question

Hello,

Essaye ceci, sur une form qui a une listview (ListView1) et un imagelist
(ImageList1):
Option Explicit

Private Sub Form_Load()
ListView1.View = lvwReport

ListView1.ColumnHeaders.Add , , "Col1"
ListView1.HideColumnHeaders = True

'Chargement de l'image list
'Peut aussi être fait en design mode
ImageList1.ListImages.Clear

ImageList1.ImageHeight = 15
ImageList1.ImageWidth = 20

ImageList1.ListImages.Add , "Clé Image1", LoadPicture("E:Program
FilesMicrosoft Visual StudioCommonGraphicsBitmapsAssortedbell.bmp")
ImageList1.ListImages.Add , "Clé Image2", LoadPicture("E:Program
FilesMicrosoft Visual StudioCommonGraphicsBitmapsAssortedSPEAKER.BMP")

'on associe le listview à l'image list contenant les images
Set ListView1.SmallIcons = ImageList1

'Clé : CléUnique0
'Libellé : Mon texte
'Index de l'image dans l'image list : 1 (ou la clé unique)
ListView1.ListItems.Add , "CléUnique0", "Mon texte", , 1
ListView1.ListItems.Add , "CléUnique1", "Mon texte 2", , 2
ListView1.ListItems.Add , "CléUnique2", "Mon texte 3", , "Clé Image1"
ListView1.ListItems.Add , "CléUnique3", "Mon texte 4", , "Clé Image2"
End Sub

--
François Picalausa (MVP VB)
http://faq.vb.free.fr --- http://msdn.microsoft.com
http://apisvb.europe.webmatrixhosting.net

"Vincent BENNER - PAGE UP" <vbenner@pageup.fr.invalid> a écrit dans le
message de news:ce3aj3$pv7$1@news-reader3.wanadoo.fr

Je cherche à faire une ListeView qui fait la chose
suivante :
Affichage d'un drapeau (genre icône 20 * 15) + Affichage
d'un libellé + (clé invisible) + ascenseur vertical.