IOS上的Delphi 10 OpenURL

Question

我正在使用Delphi 10

在较旧的适用于iOS的RAD Studio版本中，可以在openURL

中使用Apple.Utils.pas与SharedApplication

但无法找到Apple.Utils.pas，我可以在哪个单位找到SharedApplication和openURL？

Answer 1

您可以在SharedApplication中找到openURL和iOSapi.UIKit，还需要iOSapi.foundation, Macapi.Helpers

要使用它，您需要一个SharedApplication对象和一个NSURL对象，其中包含您要导航到的地址

uses iOSapi.UIKit,iOSapi.foundation, Macapi.Helpers
var
    App : UIApplication;
    url : NSurl;
begin
    App := TUIApplication.Wrap(TUIApplication.OCClass.sharedApplication);
    url := TNSURL.Wrap(TNSURL.OCClass.URLWithString(StrToNSStr('http://www.stackoverflow.com')));
    if App.canopenURL(url) then //Check if there is a default App that can open the URL
      App.openURL(url) else
        ShowMessage('Can not open URL');
end;