Android Question getInstalledPakages without system apps

[mohsen nasrabady]

hi
how can get installed pakages without system apps like the method in PakageManager class

 

[DonManfred]

how can get installed pakages without system apps like the method in PakageManager class

Like which method? I dont know a method in packagemanager who get a list without systemapps!? I do just know the method to get allinstalledapps.

 

[thedesolatesoul]

I think @NJDude had a way but not sure if it worked always. If he sees this he might reply.
See:
https://www.b4x.com/android/forum/threads/get-some-system-apps-packagemanager.30289/#content
https://www.b4x.com/android/forum/threads/list-of-all-apps-installed-by-the-user.10370/#post60850

 

[mohsen nasrabady]

thnx
it is not work in all device?
this work for me

Sub GetInstalledPackages As List
Dim Obj1, Obj2, Obj3 As Reflector
   Dim size, i, flags As Int
   Dim msg, name As String
   Dim pl As List
   pl.Initialize
   Obj1.Target = Obj1.GetContext
   Obj1.Target = Obj1.RunMethod("getPackageManager") ' PackageManager
   Obj1.Target = Obj1.RunMethod2("getInstalledPackages", 0, "java.lang.int") ' List<PackageInfo>
   size = Obj1.RunMethod("size")
   For i = 0 To size -1
      Obj2.Target = Obj1.RunMethod2("get", i, "java.lang.int") ' PackageInfo
      name = Obj2.GetField("packageName")
      Obj3.Target = Obj2.GetField("applicationInfo") ' ApplicationInfo     
      flags = Obj3.GetField("flags")  
               If Bit.AND(flags, 1)  = 0 Then
                   'app is not in the system image
                msg = msg & name & " : " & flags & CRLF
                pl.Add(name)
               End If     
     
   Next  
   Return pl
End Sub

 

[udg]

It should work.
See here, it refers to API 1 and shows no notes about subsequent deprecation.

 

[mohsen nasrabady]

thnx all