How do I boot to Safari in Delphi+iOS?

uses FMX.Helpers.iOS, Macapi.Helpers;
procedure TForm1.Button1Click(Sender:TObject);
const
  URL='http://www.google.com/';
begin
  SharedApplication.openURL (StrToNSUrl(URL));
end;