DelphiXE8中获取APK的签名信息

function GetSignatures():string;
var
  PackageName:string;
  PM:JPackageManager;
  PI:JPackageInfo;
  Signatures:String;
  SignCount:Integer;
  Signs:TJavaObjectArray<JSignature>;
  Sign:JSignature;
  JObj:JNIObject;
  Signstr:Jstring;
  I: Integer;

  tests:TJavaObjectArray<JString>;
begin
  PackageName := 'com.test.testapp;
  PM := SharedActivity.getPackageManager;
  PI := PM.getPackageInfo(StringToJString(PackageName),TJPackageManager.JavaClass.GET_SIGNATURES);           

  Signs := PI.signatures;

  Sign := TJSignature.Wrap(Signs.GetRawItem(0));//这个地方一定要Warp转换一次 ,直接用Signs[0]取不到

  Signstr := Sign.toCharsString;
  Signatures := JStringToString(Signstr);
  Result := Signatures;
end;