Spanish obtener aplicaciones

[thecid_ia]

Hola espero puedan ayudarme, tengo la version demo de B4a, y deseo hacer una aplicación para permitir usar el celular con determinadas aplicaciones, pero quisiera saber como obtengo la lista de las aplicaciones instaladas en el teléfono

 

[dar2o3]

Usa la librería phone

Dim pm As PackageManager
    Dim packages As List
    packages = pm.GetInstalledPackages
    For i = 0 To packages.Size - 1
    Dim p As String = packages.Get(i)
        Log(packages.Get(i))
    Next

Sacado de este hilo: https://www.b4x.com/android/forum/threads/list-of-all-apps-installed-by-the-user.10370/#post-60850

 

[thecid_ia]

gracias muy amable.