Italian App installate in una lista

[maxware]

Ciao Raga
Pensando ai dei moduli aggiuntivi per alfadesk volevo sapere se esiste il modo di sapere le applicazioni installate su un dispositivo ?
ciaoooo a tutti
Mamo

 

[maxware]

trovato
Se servisse ecco il codice
Dim pm As PackageManager
Dim packages As List
packages = pm.GetInstalledPackages
For i = 0 To packages.Size - 1
Log(packages.Get(i))
Next
Ciaooo
Mamo

 

[Gianni M]

oppure ...

dim Lista as List
dim Bmp as BitmapDrawable
dim pm As PackageManager
dim Lw as ListView

Lista=pm.GetInstalledPackages
Lista.Sort(True)
For i=0 To Lista.Size-1
nome=Lista.Get(i)
Bmp=pm.GetApplicationIcon(nome)
labl=pm.GetApplicationLabel(nome)
Lw.AddTwoLinesAndBitmap(nome,labl,bmp.Bitmap)
Next

 

[maxware]

ottimo

 

[Gianni M]

ottimo

mi va bene anche un "Like"

 

[maxware]

fattooo