Delphi 10 OpenURL КСН

Question

Я использую Delphi 10

В старых версиях RAD Studio для прошивкой можно было использовать openURL с SharedApplication в Apple.Utils.pas

Но 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;