XE5 android怎么调用自带浏览器打开网页

uses 
  Classes, SysUtils,
  FMX.Helpers.Android, Androidapi.JNI.GraphicsContentViewText,
  Androidapi.JNI.Net, Androidapi.JNI.JavaTypes


procedure XOpenURL(AUrl: String);
var
  Intent: JIntent;
begin
  Intent := TJIntent.JavaClass.init(TJIntent.JavaClass.ACTION_VIEW,
        TJnet_Uri.JavaClass.parse(StringToJString(AUrl)));
  SharedActivity.startActivity(Intent);
end;