Permissions der eigenen App öffnen

[QuickAndDirty]

Sieht das korrket aus?
Und
Wie kann ich 'com.my.app' per programm herausfinden so das die methode universal einsetzbar ist?

Delphi-Quellcode:

procedure OpenAppSettings;
{$IFDEF ANDROID}
  Const
    cACTION_APPLICATION_DETAILS_SETTINGS = 'android.settings.APPLICATION_DETAILS_SETTINGS';
  var
    Intent: JIntent;
    ResolveInfo: JResolveInfo;
    AppId:String;
{$ENDIF}
begin
{$IFDEF ANDROID}
  AppID := JStringToString(TAndroidHelper.Context.getApplicationContext.getPackageName); 
  Intent := TJIntent.JavaClass.init( StringToJString(cACTION_APPLICATION_DETAILS_SETTINGS) );
  Intent.setData(StrToJURI('package:'+ AppID ));
  Intent.setFlags(TjIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK);
  ResolveInfo := SharedActivity.getPackageManager.resolveActivity(Intent, 0);
  if assigned(ResolveInfo) then
    SharedActivity.startActivity(Intent);
{$ENDIF}
end;