Discussion :

[Miska59]

Bonjour,

j'ai un petit souci avec imagelist quand j'ajoute plusieurs une image avec openfiledialog dans listview1 sont toujours la mème image.

voici le code ajouter dans listview1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 If TextBox1.TextLength > 0 AndAlso TextBox2.TextLength > 0 Then
            AddListview(TextBox1.Text, TextBox2.Text)
            ....etc
        End If
 
 Private Sub AddListview(ByVal MyImage As String, ByVal URL As String)
        Using IMG As Image = Image.FromFile(MyImage)
            If Not IMG Is Nothing Then
                ImgList.Images.Add(IMG)
            End If
            Dim Lvi As New ListViewItem("", ImgList.Images.Count - 1)
            Lvi.SubItems.Add(URL)
            Form1.ListView1.Items.Add(Lvi)
            Form1.ListView1.SmallImageList = ImgList
        End Using
    End Sub

voici en image :


j'arrive pas ajouter image par image dans listview1. avez-vous une solution pour ajouter image par image dans listview1?
Merci,