delphi 打开Android应用信息

您可以从Android应用程序打开应用程序信息屏幕。

请在此处查看详细信息。

https://developer.android.com/reference/android/provider/Settings.html

为此，传递ACTION_APPLICATION_DETAILS_SETTINGS和package：并连接应用程序的包名称以打开它。

您可以将程序包连接起来：自己输入字符串，也可以指定另一个应用程序的程序包名称以打开该应用程序的设置屏幕。

样例代码

unit Unit1;

interface

uses

System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,

FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls,

FMX.Controls.Presentation,

Androidapi.Jni, Androidapi.JNI.JavaTypes, Androidapi.Helpers, Androidapi.JNIBridge,

Androidapi.JNI.Util, Androidapi.JNI.GraphicsContentViewText, Androidapi.Jni.Provider,

Androidapi.Jni.Net, Androidapi.Jni.App

;

type

TForm1 = class(TForm)

ToolBar1: TToolBar;

Button1: TButton;

procedure Button1Click(Sender: TObject);

private

{ private 宣言 }

public

{ public 宣言 }

end;

var

Form1: TForm1;

implementation

{$R *.fmx}

procedure TForm1.Button1Click(Sender: TObject);

var

Intent: JIntent; // Intent

uri: string; // URI包：+包名

begin

//使用TAndroidHelper.Context.getPackageName获取自己的包名

//从IDE菜单中，Project |（可选）打开版本信息并获取在包密钥中指定的名称

//默认值是com.embarcadero。项目名称

//使用ACTION_APPLICATION_DETAILS_SETTINGS

//在包之后：字符串必须发送获取的

包名称的串联版本

//这是包名称，但是如果您指定设备上安装的应用程序的包名称

//您可以显示指定应用程序的应用程序信息屏幕

uri := 'package:' + JStringToString(TAndroidHelper.Context.getPackageName);

Intent := TJIntent.JavaClass.init(TJSettings.JavaClass.ACTION_APPLICATION_DETAILS_SETTINGS, StrToJURI(uri));

// startActivity跳过意图，打开应用程序的信息的屏幕

TAndroidHelper.Activity.startActivity(Intent);

end;

end.

推荐分享