German Einlesen von Apps unter Android 5

so27

Active Member
Licensed User
Longtime User
Hallo zusammen,

wer von Euch mal alle Apps unter Android 5 einlesen und dabei auch das jeweilige App-Icon mit einbeziehen möchte, wird u. U. einen Fehler erhalten.

Dieser Fehler liegt am Package com.android.systemui. Hier ist kein App-Symbol vorhanden und mir ist jedes Mal das Einlesen mit einem Fehler ausgestiegen.

Für jeden, den es interessiert, hier der Code wie das oben genannte Package übergangen werden kann:

B4X:
Sub Einlesen

ListView1.clear

Dim  pm As PackageManager

Dim bdw As BitmapDrawable

ListView1.Clear

pl = pm.GetInstalledPackages

For a=0 To pl.Size-1

'ProgressDialogShow("Apps werden geladen..." & a)   
' Wer mag kann hier zur Überbrückung der Wartezeit
' einen ProgressDialog einblenden

If pl.Get(a)="com.android.systemui" Then Continue
' Diese obere Zeile bewirkt, dass das Package erkannt und übergangen wird (Continue)

bdw = pm.GetApplicationIcon(pl.Get(a))   
        ListView1.AddTwoLinesAndBitmap2(pm.GetApplicationLabel(pl.Get(a)),pl.Get(a), bdw.Bitmap, pl.Get(a))

Next

' ProgressDialogHide
' Um den Warte-Dialog zu schließe

End Sub
 
Top