Ciao, a tutti mi sto cimentando con la creazione di un programma con Gambas (uso la 3.5.12) e grazie a molti post letti qui sul forum ho risolto diversi problemi.
Ora però ho un problema di cui non riesco a venire a capo.
Uso una listview per selezionare ed inviare degli item ad una label mediante la pressione di un pulsante.
Il problema si presenta se dopo il primo utilizzo del pulsante seleziono altri item e lo ripremo per aggiungerli alla label, il programma mi segnala che gli item non esistono.
Penso che durante la creazione della listview ad ogni voce venga assegnato in item e conservi questo anche se le posizioni intermedie vengono eliminate. Di fatto l'item dopo il primo utilizzo non corrisponde più alla posizione visualizzata correntemente ed il listview.count è sempre quello iniziale con tutti gli item anche se alcuni sono stati eliminati.
Non so se esiste un comando per fare riattribuire gli item...
Di seguitoil codice che utilizzo:
' Gambas class file
Public Sub Form_Open()
ListView1.Add("1", "Pippo")
ListView1.Add("2", "Pluto")
ListView1.Add("3", "Paperino")
ListView1.Add("4", "Gastone")
ListView1.Add("5", "Qui")
ListView1.Add("6", "Quo")
ListView1.Add("7", "Qua")
End
Public Sub Button1_Click()
Dim a As Integer
For a = 1 To ListView1.Count
If ListView1[a].Selected = True Then
Label1.text = Label1.text & ListView1[a].Text & " "
ListView1[a].Selected = False
ListView1.Remove(a)
Endif
Next
End
Grazie in anticipo.
A presto.
Visualizza post
