Delphi IOS 上的 10 个 OpenURL
Delphi 10 OpenURL on IOS
我正在使用 Delphi 10
在 iOS 的旧 RAD Studio 版本中,可以在 Apple.Utils.pas
中将 openURL
与 SharedApplication 一起使用
但是找不到Apple.Utils.pas
,在什么单位可以找到SharedApplication
和openURL
?
您可以在iOSapi.UIKit
中找到SharedApplication
和openURL
,您还需要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.whosebug.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;
我正在使用 Delphi 10
在 iOS 的旧 RAD Studio 版本中,可以在 Apple.Utils.pas
openURL
与 SharedApplication 一起使用
但是找不到Apple.Utils.pas
,在什么单位可以找到SharedApplication
和openURL
?
您可以在iOSapi.UIKit
中找到SharedApplication
和openURL
,您还需要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.whosebug.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;