好多应用市场上架都对最低api进行了限制,要求安卓版本8.0以上。我在delphi xe 10.2.3下开发的程序需要升级。
升级过程中,做一记录:
1、旧项目不做任何改动,编译可以通过,但在手机上运行,卡在启动界面,过较长一段时间自动退出。检查工作目录没有创建成功。是因为新版安卓要求权限不只是optionj里配置好,还要求和程序里动态申请。于是
单元引入
System.permissions,
Androidapi.JNI.Support,
定义变量:
FPermissionCamera,
FPermissionReadExternalStorage,
FPermissionWriteExternalStorage,
FPermissionReadPhoneState: string;
在FormCreate中加入
{$IFDEF ANDROID}
FPermissionCamera := JStringToString(TJManifest_permission.JavaClass.CAMERA);
FPermissionReadExternalStorage := JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE);
FPermissionWriteExternalStorage := JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE);
FPermissionReadPhoneState:= JStringToString(TJManifest_permission.JavaClass.READ_PHONE_STATE );
PermissionsService.RequestPermissions([FPermissionCamera, FPermissionReadExternalStorage, FPermissionWriteExternalStorage, FPermissionReadPhoneState], nil,nil);
{$ENDIF}
代码经过以上处理,并不能正常运行,还需要第2步
2、
在AndroidManifest.template.xml中
分别加入
<%provider%> 动态申请权限
android:usesCleartextTraffic="true" 解决访问网络错误
3、 project -> Options -> Application -> Entitlement list 下
Secure File Sharing 选项打勾
4、uri改为
uri :=
TJFileProvider.JavaClass.getUriForFile(TAndroidHelper.Context,
StringToJString(JStringToString(TAndroidHelper.Context.getPackageName) + '.fileprovider'), AttachmentFile );
需要引入 Androidapi.JNI.Support,
旧格式为://uri := StrToJURI('file://' + MyWorkDir + Label1.Text + fe); 不提示错误,但分享或调用其它应用时会失败