delphiXE4 iOS开放电子邮件程序无法正常工作
我正在iPhone4上testing下面的代码(没有SIM卡,但我不明白这是怎么回事,因为它的邮件程序工作正常):
SharedApplication和canOpenURL等都是XE4提供的例程。
procedure TFormMain.sbContactsDetailsEmailClick(Sender: TObject); var S: string; NSU: NSUrl; begin // URL.stringByAddingPercentEscapesUsingEncoding(NSUTF8StringEncoding); S := 'mailto:' + 'info@example.com' + '?subject=' + 'title' + '&body='; NSU := StringToNSUrl(S); if SharedApplication.canOpenURL(NSU) then SharedApplication.openUrl(NSU) ; end;
不幸的是,似乎SharedApplication.canOpenURL(NSU)返回false。 我做错了什么?
我应该通过它自己,但是这里有:
做工作
'mailto:info@example.com?subject=test' 'mailto:info@example.com?subject=test%20test'
不起作用
'mailto:info@example.com?subject=test test'
(即解决scheme是将空间转换为%20)