German Combobox füllen in Schleife

Sinan Tuzcu

Active Member
Licensed User
Hallo,

ich hätte jetzt gedacht, das ich ein Combobox (Spinner) mit dem folgenden Code füllen könnte
B4X:
Public OutputNamenListe As List

Sub Fill_cmbOutputNamen(Anzahl As Int)
        
    OutputNamenListe.Initialize
    For i = 1 To Anzahl
        OutputNamenListe.InsertAt(i,i)' 
    Next
    cmbOutputName.AddAll(OutputNamenListe)
End Sub
ich bekomme auch keine Fehler aber der ComboBox wird auch nicht gefüllt.

Was mache ich falsch?

PS: Sollte das folgende ersetzen, da die Anzahl Variable ist.
B4X:
cmbSekListe.Initialize
cmbSekListe.AddAll(Array As Int(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,52,53))
 

DonManfred

Expert
Licensed User
Was mache ich falsch?
Du bekommst einen Fehler aber DU IGNORIERST IHN. Dir kommt es auch nicht in den Sinn den kompletten Fehler hier zu POSTEN (wäre ja eine Hilfe für alle die den Post lesen).

Ich lege Dir nochmals die Videos ans Herz.... Schau dir die videos an. Vor allem das von Collections.

B4X:
Sub Fill_cmbOutputNamen(Anzahl As Int)
   dim OutputNamenListe As List
    OutputNamenListe.Initialize
    For i = 1 To Anzahl
        OutputNamenListe.Add(i)'
    Next
    cmbOutputName.AddAll(OutputNamenListe)
End Sub
 

Sinan Tuzcu

Active Member
Licensed User
Don oder Manfred,
ich bekomme keine fehler. Und wenn ich ein Fehler bekommen sollte, warum sollte ich das ignorieren .?
 
Top