Delphi XE4 iOS开放电子邮件程序无法正常工作

Question

我正在iPhone4上测试以下代码（没有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。 我做错什么了吗？

Answer 1

我本人应该已经完成​​它，但是这里有：

做工作

'mailto:info@example.com?subject=test'
'mailto:info@example.com?subject=test%20test'

不起作用

'mailto:info@example.com?subject=test test'

（即解决方案是将空格转换为％20）