Einzelnen Beitrag anzeigen

QuickAndDirty

Registriert seit: 13. Jan 2004
Ort: Hamm(Westf)
1.944 Beiträge
 
Delphi 12 Athens
 
#2

AW: Probleme auf Android 12 und 13 mit TJPendingIntent

  Alt 6. Jun 2023, 10:21
Ich bin ein bisschen gierig nach Aufmerksamkeit.
Ist das eine Known issue?
Ist mein googlefoo zu schlecht?

Edit:Ich habe den code mal in wie folgt geändert...führt aber nicht zu einer verbesserung bei Android 12 und 13
Delphi-Quellcode:
Const
  FLAG_MUTABLE:Integer =$02000000;
  FLAG_IMMUTABLE:Integer =$04000000;//TJPendingIntent.JavaClass.FLAG_IMMUTABLE
Begin
      Flags := TJIntent.JavaClass.FLAG_ACTIVITY_SINGLE_TOP;
      TLog.d('OSVersion: Major='+TOSVersion.Major.tostring+' Minor='+TOSVersion.Minor.ToString+' Name='+TOSVersion.Name);
      If TOSVersion.Major>=12 then // >= Android 12
        Flags := Flags or FLAG_MUTABLE;
      ClassIntent := TJIntent.JavaClass.init(TAndroidHelper.Context, TAndroidHelper.Activity.getClass);
      PendingIntent := TJPendingIntent.JavaClass.getActivity(TAndroidHelper.Context, 0,
                                                             ClassIntent.addFlags(Flags), 0);
      FNFCPresent := false;
end;
Andreas
Monads? Wtf are Monads?

Geändert von QuickAndDirty ( 6. Jun 2023 um 12:35 Uhr)
  Mit Zitat antworten Zitat