Abrir Navegador por defecto con URL Android Delphi XE7

[wolfran_hack]

Siempre utilice:

Código Delphi [-]
ShellExecute(0, 'OPEN', PChar('http://www.clubdelphi.com/'), '', '', SW_SHOWNORMAL);

¿Cómo puedo tener el mismo comportamiento (la apertura de un enlace en el navegador por defecto), en Android?

[[AgustinOrtu]]

Con TWebBrowser?

[wolfran_hack]

la idea es usar el navegador externo, chrome, firefox, opera, el que tenga el android.

[[AgustinOrtu]]

En Firemonkey TWebBrowser es un wrapper del navegador nativo

[aposi]

Código Delphi [-]

uses   
Androidapi.JNI.GraphicsContentViewText,   FMX.Helpers.Android;


procedure TForm3.Button1Click(Sender: TObject); 
var   Intent: JIntent; 
begin
   Intent := TJIntent.Create;
   Intent.setAction(TJIntent.JavaClass.ACTION_VIEW);
   Intent.setData(StrToJURI('http://www.clubdelphi.com'));
   SharedActivity.startActivity(Intent);
 end;

[wolfran_hack]

me da error en:

Intent.setData(StrToJURI('http://www.clubdelphi.com'));
SharedActivity.startActivity(Intent);