12/08/2011, 13:52
|
| | Fecha de Ingreso: abril-2010
Mensajes: 82
Antigüedad: 14 años, 6 meses Puntos: 2 | |
Icono en List View Hol amigos, estoy tratando de hacer un listado de impresoras y mostrarlas en un
List view , ya que este me permite agregar iconos. La idea es que el usuario vea una listita de las impresoras disponibles, y para hacerla mas linda, le agregue un icono de una impresora que saque del google.
Ahora, ya configure el Imagelist asociado, pero no aparece ningun icono....si les paso un poco el codigo, alguno me puede decir que estoy haciendo mal??
Desde ya muchas gracias
Dim Archivo As New Ini
Archivo.Archivo = "dm100_Printers.ini"
Dim CantidadEquipos As Integer = Val(Archivo.LeeIni("Equipos", "Cantidad"))
Dim Item As ListViewItem
frmSeleccionarEquipo.lvEquipos.Items.Clear()
For i As Integer = 0 To CantidadEquipos - 1
Item = frmSeleccionarEquipo.lvEquipos.Items.Add(Archivo.L eeIni("Impresor" & i.ToString, "Nombre"))
Item.StateImageIndex = 0
Next
frmSeleccionarEquipo.lblEquipo.Text = "Equipo: " & Archivo.LeeIni("Impresor0", "Nombre")
frmSeleccionarEquipo.lblDireccionIp.Text = "Direccion Ip: " & Archivo.LeeIni("Impresor0", "Ip") |