How use google play services API in Delphi FMX app?

Question

Anyone has example to use google play services API in Delphi FMX app? I want to get READ_EXTERNAL_STORAGE permission via google play services. see this link for more information: https://developers.google.com/android/guides/permissions

This is my code:

{$IFDEF Android}

    PermissionsService.RequestPermissions([JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE),
        JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE)],
      procedure(const APermissions: TArray < string > ; const AGrantResults:
        TArray<TPermissionStatus>)
      begin
        if (Length(AGrantResults) = 2) and (AGrantResults[0] =
          TPermissionStatus.Granted) and
          (AGrantResults[1] =
          TPermissionStatus.Granted) then
        begin
          isPermittedLocalStorageW := True;