Ver Mensaje Individual
  #1 (permalink)  
Antiguo 04/07/2008, 15:13
juandedios
 
Fecha de Ingreso: mayo-2003
Ubicación: Lima
Mensajes: 967
Antigüedad: 21 años, 9 meses
Puntos: 8
Imagenes en ListView

Saludos:

Esto en VB 2005, estoy cambiando los DataGridView por ListView y todo esta bien, pero quiero poner una imagen al principio de cada fila.

La cosa es que para llenar los listview uso una funcion, pero donde pongo la linea que supuestamente pone la imagen al principio de la fila, solo me lo hace para la primera fila y no se como ponerlo para todos, aqui les pongo la funcion:
Código:
Public Sub LlenarListView(ByVal StrSql As String, ByVal Table As String, _
                              ByVal LSTV As ListView, ByVal IMG As ImageList)
        cmdNem = New MySqlCommand(StrSql, cnNem)
        daNem = New MySqlDataAdapter
        dsNem = New DataSet

        daNem.SelectCommand = cmdNem
        daNem.Fill(dsNem, Table)

        For c As Integer = 0 To dsNem.Tables(Table).Columns.Count - 1
            LSTV.Columns.Add(dsNem.Tables(Table).Columns(c).Caption)
        Next

        LSTV.SmallImageList = IMG

        With dsNem.Tables(Table)
            For f As Integer = 0 To .Rows.Count - 1
                Dim dato As New ListViewItem(.Rows(f).Item(0).ToString)
                ' recorrer las columnas
                For c As Integer = 1 To .Columns.Count - 1
                    dato.SubItems.Add(.Rows(f).Item(c).ToString())
                Next
                LSTV.Items.Add(dato)
                LSTV.Items(0).ImageIndex = 0
            Next
        End With
    End Sub
__________________
El aprendiz.