Android Question PackageManager

[Deleted member 103]

Hi,

how can I convert this B4a functions in B4i?
Thank you.

Sub getVersion As String
    Dim pm As PackageManager
    Return pm.GetVersionName(GetPackageName)
End Sub

Sub GetVersionCode As Int
    Dim pm As PackageManager
    Return pm.GetVersionCode(GetPackageName)
End Sub

Sub GetApplicationLabel As String
    Dim pm As PackageManager
    Return pm.GetApplicationLabel(GetPackageName)
End Sub

Sub GetPackageName As String
   Dim r As Reflector
   Return r.GetStaticField("anywheresoftware.b4a.BA", "packageName")
End Sub

 

[DonManfred]

You dont have these Values in a B4J Application i believe

#Region  Project Attributes
    #MainFormWidth: 600
    #MainFormHeight: 400
#End Region

And there are no "packages" installed in Windows as this came from the base of android.

 

[DonManfred]

For your own Program you could simple use

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    Public VersionName As String = "v1.2.345"
    Public VersionCode As Int = 123
    Public ApplicationLabel As String = "My great Appname"
End Sub

but i think there is no way to get other java-apps name or versioncode

 

[Deleted member 103]

Sorry guys, wrong forum. the question belongs in B4i-forum.

 

[DonManfred]

the question belongs in B4i-forum

even if written there my answer would be the same

 

[Deleted member 103]

@DonManfred
Thank you