Ich versuche schon seit Stunden, eigene Type in einem List zu speichern.
Leider nur mit wenig Erfolg.
Hier mal ein Code Ausschnitt.
B4X:
Type Hallo (Name As String, Author As String, ISBN as String)
Dim eintrag As Hallo
Dim Liste As List
liste.Initialize
eintrag.Initialize
For a = 0 To 10
Eintrag.Name = "Test " & a
Eintrag.Author ="Hallo"
liste.Add(Eintrag) 'Hier passiert der Fehler
Next
Eintrag.Name = "Höllenjagd"
Eintrag.Author ="Clive"
liste.Add(Eintrag)
Der Fehler ist der, das am Schluß in allen Einträgen der Liste die Werte der letzten beiden Zeilen stehen ( Höllenjagd & Clive)
Liste.Initialize
Eintrag.Initialize
For a = 0 To 10
Dim Eintrag As Hallo
Eintrag.Name = "Test " & a
Eintrag.Author ="Hallo" & a
Liste.Add(Eintrag)
Next
Dim Eintrag As Hallo
Eintrag.Name = "Höllenjagd"
Eintrag.Author ="Clive"
Liste.Add(Eintrag)
Du musst Eintrag jedes mal neu mit Dim deklarieren.