German Einsatz der licencing-Lib

peternmb

Well-Known Member
Licensed User
Longtime User
Hallo,
ich habe ein Verständnis-Problem beim Einsatz der Licensing-Lib.

Ich möchte meine App als FREE- und als PRO-Version im PlayStore anbieten.
Kann ich das mit einer App realisieren oder muss ich da 2 Apps erstellen?

Mein Code sieht in etwas so aus.
B4X:
Sub Process_Globals
  Dim publicKey As String  'wird von google-market bereitgestellt
  publicKey = "...usw..."
  Dim IsReg As String  : IsReg=0 
  'usw
End Sub

Sub Activity_Create(FirstTime As Boolean)
   If FirstTime Then
       Dim lc As LicenseChecker
       Dim P As PhoneId       
       lc.Initialize("lc", P.GetDeviceId, publicKey, "hkzzudz6zutfgfg".GetBytes("UTF8"))
       lc.SetVariableAndValue("IsReg","1")
       lc.CheckAccess   
       DoEvents
   End If
   '
   Activity.LoadLayout("Start")
   If IsReg=0 Then
     Activity.Title = "Meine App FREE"
   Else
     Activity.Title = "Meine App PRO"
   End If
   '
End Sub

Nur, wenn jemand die FREE-app installiert, dann ist das doch auch bei goggle registriert oder nicht???
 
D

Deleted member 103

Guest
Hallo Peter,

dann mach es einfach so:
B4X:
Sub Process_Globals
  Dim publicKey As String  'wird von google-market bereitgestellt
  publicKey = "...usw..."
  Dim IsReg As String  : IsReg=0
  'usw
End Sub

Sub Activity_Create(FirstTime As Boolean)
  If FirstTime Then
  End If
  '
  Activity.LoadLayout("Start")
  If IsReg=0 Then
    Activity.Title = "Meine App FREE"
  Else
    Activity.Title = "Meine App PRO"
    Dim lc As LicenseChecker
    Dim P As PhoneId     
    lc.Initialize("lc", P.GetDeviceId, publicKey, "hkzzudz6zutfgfg".GetBytes("UTF8"))
    lc.SetVariableAndValue("IsReg","1")
    lc.CheckAccess 
    DoEvents
  End If
  '
End Sub
 

peternmb

Well-Known Member
Licensed User
Longtime User
Hallo Filippo,

ich sehe zwar den Unterschied, verstehe allerdings den Sinn davon nicht.
Da die Variable "IsReg" in den Prozess_Globals mit 0 definiert wird, kommt doch immer bei Titel "FREE".

Vielleicht stehe ich da auch irgendwo auf dem Schlauch...
 
D

Deleted member 103

Guest
Jetzt habe deine Frage richtig verstanden.
Du musst 2 APP erstellen, eins mit IsReg = True und eins mit IsReg = False.
 
Top