Firemonkey iOS open URL

[alf2020]

Hallo zusammen,

ich möchte gerne aus meiner iPhone - App mit Delphi XE2 / Firemonkey (update 4)eine URL öffnen, wenn ich auf einen Button klicke.

ich habe auch schon ein kleines Beispiel ausprobiert:

Delphi-Quellcode:

unit Unit1;
 
{$IFDEF FPC}
 {$mode objfpc}{$H+}
 {$modeswitch objectivec1}
 {$ENDIF}
 
interface
 
uses
 SysUtils, Types, UITypes, Classes, Variants, FMX_Types, FMX_Controls, FMX_Forms,
 FMX_Dialogs
 {$IFDEF FPC}
 , iPhoneAll
 {$ENDIF}
 ;
 
type
 TForm1 = class(TForm)
 Button1: TButton;
 procedure Button1Click(Sender: TObject);
 private
 { Private declarations }
 public
 { Public declarations }
 end;
 
var
 Form1: TForm1;
 
implementation
 
{$R *.lfm}
 
procedure TForm1.Button1Click(Sender: TObject);
 begin
 // Open a URL
 {$IFDEF FPC}
 UIApplication.sharedApplication.openUrl(NSUrl.URLWithString(NSSTR(PChar(’[url]http://blogs.embarcadero.com/ao’))));[/url]
 {$ENDIF}
 end;
 
end.

Der Delphi Compiler findet keinen Fehler. Anwendung in Windows läuft.
Exportiere ich das nach Mac (Xcode) und starte den Simulator, dann bricht der XCode compiler ab und
sagt das er Fehler gefunden hat.
Auch direkt mit dem iPhone klappt es nicht. Bevor das App auf das iPhone übertragen wird
bricht Xcode mit Fehlermeldung ab.

Könnt Ihr helfen?