[VB6] Inserire icone in una Listview

[Alexinfa]

Buon giorno,
ho una piccola domanda sul Visual Basic 6:
Se io creo una Listview di nome Lista, con il comando:

Lista.ListItems.Add , , "Pippo"
Lista.ListItems.Item(Lista.ListItems.Count).SubIte ms(1) = "Paperino"

inserisco nella Lista una riga con scritto:

Pippo Paperino

se a questo punto vorrei introdurre un icona davanti a Pippo come ad esempio:

Pippo Paperino

Come dovrei fare?
inoltre, e' possibile modificare/introdurre l'icona anche succevviamente alla realizzazione di una riga o necessariamente tali operazioni devono essere svolte durante la creazione di una riga?

Grazie in anticipo per la risposta

[MdE2005]

Ciao AlexInfa.. il codice per inserire icone è questo però prima devi caricare un controllo ImageList e popolarlo con icone (manualmente o da codice).

Private Sub Form_Load()
Dim LI As ListItem
ListView1.Icons = ImageList1
Set LI = ListView1.ListItems.Add(, , "ciao", 1)
Me.ListView1.View = lvwIcon
'dove 1 è l'indice delle icone nell'imagelist
End Sub

Per correttezza di informazione ti dico che questo è un esempio POCO esplicativo di tutte le proprietà di questo controllo, per cui ti consiglio di cercare su Internet o sulla guida in linea MSDN..

Ciao..

[Alexinfa]

Scusami ma l'icona la vedo sopra a ciao e non a sinistra

[MdE2005]

Ciao..ti rinnovo il mio consiglio di documentarti sulle enormi potenzialità di questo controllo cmq praticamente devi usare le smallicon al posto delle icon:

Private Sub Form_Load()
Dim LI As ListItem
ListView1.SmallIcons = ImageList1
Set LI = ListView1.ListItems.Add(, , "ciao", , 1)
Me.ListView1.View = lvwSmallIcon
'dove 1 è l'indice delle smallicons nell'imagelist
End Sub

ciao AUGURI

[Alexinfa]

sisi grazie, infatti alla fine leggendo su msdn son riuscito a capire come metterla pero' ora non capisco come fare a modificarla senza cioe' ricreare da 0 una riga.

Auguri anche a te

[MdE2005]

Ciao..

Private Sub Command1_Click()
ListView1.ListItems(n).SmallIcon = m
End Sub

dove n è l'Index della riga che vuoi modificare e m è l'Index della immagine nella ImageList1

Ciao.. (per il programma mp3 ecc. mandami una mail che non ho capito..)

fammi sapere..ciao

[Alexinfa]

Grazie infinite, funziona e ancora Auguri!!!

cmq per il problema degli mp3 l'ho messo in disparte almeno per ora.

Appena avro' reso il mio prg funzionante almeno al 70% ti contatto per email e te lo spedisco.

[MdE2005]

Ok..perfetto..ciao