Spinner Problem since Android 4.0.3

Paulsche

Well-Known Member
Licensed User
Longtime User
After updating to Android 4.0.3 hangs on my 3 APPs for some choice spinner.
After Choise comes black screen, then message "HB-fuel stopped" .

It does not each spinners view.

Does anyone know the problem?
 

Paulsche

Well-Known Member
Licensed User
Longtime User
the Error-Log

Here is the error log:

LogCat connected to: 00197dd3465d5e
--------- beginning of /dev/log/main


--------- beginning of /dev/log/system


** Activity (main) Create, isFirst = true **


** Activity (main) Resume **


java.lang.NullPointerException


at android.widget.Spinner$DialogPopup.dismiss(Spinner.java:672)
at android.widget.Spinner$DialogPopup.onClick(Spinner.java:703)
at com.android.internal.app.AlertController$AlertParams$3.onItemClick(AlertController.java:929)
at android.widget.AdapterView.performItemClick(AdapterView.java:292)
at android.widget.AbsListView.performItemClick(AbsListView.java:1177)
at android.widget.AbsListView$PerformClick.run(AbsListView.java:2705)
at android.widget.AbsListView$1.run(AbsListView.java:3458)
at android.os.Handler.handleCallback(Handler.java:605)
at android.os.Handler.dispatchMessage(Handler.java:92)
at android.os.Looper.loop(Looper.java:137)
at android.app.ActivityThread.main(ActivityThread.java:4507)
at java.lang.reflect.Method.invokeNative(Native Method)
at java.lang.reflect.Method.invoke(Method.java:511)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:790)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:557)


at dalvik.system.NativeStart.main(Native Method)
 
Upvote 0

Paulsche

Well-Known Member
Licensed User
Longtime User
Problem solved, SUB recursive call, Android 4.0.3 takes the most accurate.
"SCV10Einstellungen_fuellen" excluded works now.


B4X:
Sub SCV10Einstellungen_fuellen                                    ' Werte für Einstellungen in Liste füllen
   Dim linie(4) As Label                                       ' Trennlinie zwischen Zeilen

   Einstellungen_leeren                                       ' Scrollview Einstellungen Views leeren

   For i = 0 To 3
      linie(i).Initialize("linie(i)")                              ' Zeilentrennlinie zwischen Werten
      linie(i).Color            = Colors.Gray
   Next

   SPI10_Sprache.SelectedIndex      = sprache
   SPI10_KMeingabe.SelectedIndex   = km_eingabe
   SPI10_tbl_sort.SelectedIndex   = tbl_sort
   wert_waehrung.Text            = waehrungssymbol

   If sprache = 1 Then
      titel_waehrung.TextColor   = Colors.Gray
      titel_waehrung.Enabled      = False                           ' Währungssymbol =$ , nicht änderbar
      wert_waehrung.TextColor      = Colors.Gray
      wert_waehrung.Enabled      = False
   End If   
   
   Dim ypos,abstand,catx,wertx As Int
   ypos    = 2dip
   catx   = 5dip
   wertx   = 15dip
   abstand   = 28dip
   SCV10Einstellungen.Panel.AddView(cat_Allgemein,0,ypos,100%x,25dip)               ' Kategorie "Allgemein" Titel einfügen
   ypos   = ypos + abstand

   SCV10Einstellungen.Panel.AddView(titel_waehrung,wertx,ypos,100%x-wertx,30dip)      ' Titeltext für Währungssymbol
   ypos   = ypos + abstand
   SCV10Einstellungen.Panel.AddView(wert_waehrung,wertx+10dip,ypos,100%x-wertx,25dip)      ' Wert der variablen "Waehrungssymbol"
   ypos   = ypos + abstand
   
   SCV10Einstellungen.Panel.AddView(linie(0),0,ypos,100%x-wertx,1dip)               ' Zeilentrennlinie einfügen
   ypos   = ypos + abstand -15dip 
   
   SCV10Einstellungen.Panel.AddView(Titel_sprache,wertx,ypos,100%x-wertx,30dip)      ' Titeltext für Sprache
   ypos   = ypos + abstand
   SCV10Einstellungen.Panel.AddView(SPI10_Sprache,wertx,ypos,100%x-wertx,40dip)      ' Wert der variablen "sprache"
   ypos   = ypos + abstand + 20dip

   SCV10Einstellungen.Panel.AddView(linie(1),0,ypos,100%x-wertx,1dip)               ' Zeilentrennlinie einfügen
   ypos   = ypos + abstand -15dip 

   SCV10Einstellungen.Panel.AddView(Titel_KMeingabe,wertx,ypos,100%x-wertx,30dip)      ' Titeltext für Sprache
   ypos   = ypos + abstand
   SCV10Einstellungen.Panel.AddView(SPI10_KMeingabe,wertx,ypos,100%x-wertx,40dip)      ' Wert der variablen "sprache"
   ypos   = ypos + abstand + 20dip
   
   SCV10Einstellungen.Panel.AddView(cat_tabelle,0,ypos,100%x,25dip)               ' Kategorie "Tabelle" Titel einfügen
   ypos   = ypos + abstand
   
   SCV10Einstellungen.Panel.AddView(titel_tbl_spalten,wertx,ypos,100%x-wertx,30dip)   ' Titeltext für Tabellenspalten ein/aus
   ypos   = ypos + abstand +15dip
   
   SCV10Einstellungen.Panel.AddView(CHKBox10KFZ,wertx,ypos,100dip,35dip)            ' Wert Tabellenspalte KFZ Nr.
   SCV10Einstellungen.Panel.AddView(CHKBox10datum,170dip,ypos,100dip,35dip)         ' Wert Tabellenspalte Datum
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(CHKBox10ort,wertx,ypos,100%x-wertx,35dip)         ' Wert Tabellenspalte Ort
   SCV10Einstellungen.Panel.AddView(CHKBox10Tachostand,170dip,ypos,100%x-wertx,35dip)   ' Wert Tabellenspalte Tachostand
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(CHKBox10distanz,wertx,ypos,100%x-wertx,35dip)      ' Wert Tabellenspalte Distanz
   SCV10Einstellungen.Panel.AddView(CHKBox10tage,170dip,ypos,100%x-wertx,35dip)      ' Wert Tabellenspalte Tage
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(CHKBox10liter,wertx,ypos,100%x-wertx,35dip)      ' Wert Tabellenspalte Liter
   SCV10Einstellungen.Panel.AddView(CHKBox10Literpreis,170dip,ypos,100%x-wertx,35dip)   ' Wert Tabellenspalte Literpreis
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(CHKBox10verbrauch,wertx,ypos,100%x-wertx,35dip)   ' Wert Tabellenspalte Verbrauch
   SCV10Einstellungen.Panel.AddView(CHKBox10rechnung,170dip,ypos,100%x-wertx,35dip)   ' Wert Tabellenspalte Rechnung
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(CHKBox10tankart,wertx,ypos,100%x-wertx,35dip)      ' Wert Tabellenspalte Tankart
   SCV10Einstellungen.Panel.AddView(CHKBox10Notiz,170dip,ypos,100%x-wertx,35dip)      ' Wert Tabellenspalte Notiz
   ypos   = ypos + abstand +20dip
   SCV10Einstellungen.Panel.AddView(linie(2),0,ypos,100%x-wertx,1dip)               ' Zeilentrennlinie einfügen
   ypos   = ypos + abstand -15dip
   SCV10Einstellungen.Panel.AddView(Titel_tbl_sort,wertx,ypos,100%x-wertx,30dip)      ' Titeltext für Tabellensortierung
   ypos   = ypos + abstand
   SCV10Einstellungen.Panel.AddView(SPI10_tbl_sort,wertx,ypos,100%x-wertx,40dip)      ' Wert der variablen "sprache"
   ypos   = ypos + abstand +10dip
   SCV10Einstellungen.Panel.AddView(linie(3),0,ypos,100%x-wertx,1dip)               ' Zeilentrennlinie einfügen
   
   pnl10scroll.Height   = ypos +30dip
End Sub

Sub Einstellung_Sprache_itemclick   (Position As Int, Value As Object)               ' Einstellung Sprache ändern wurde gewählt
   sprache   = SPI10_Sprache.SelectedIndex
   If sprache = 1 Then
      Msgbox("Be restarted after changing the language, the program must !","")
   Else
      Msgbox("Nach Änderung der Sprache muss das Programm neu gestartet werden !","")
   End If
'   SCV10Einstellungen_fuellen                                             ' Scollview neu füllen
End Sub
 
Upvote 0
Cookies are required to use this site. You must accept them to continue using the site. Learn more…