ios - 如何让 firemonkey 在 iOS 上显示本地通知？

Question

我从 Embarcadero 网站 (here) 中提取了以下代码生成本地通知。

procedure TForm1.SetNumberClick(Sender: TObject);
var
  MyNotification: TNotification;
begin
  // Create an instance of TNotification
  MyNotification := NotificationCenter1.CreateNotification;
  try
      MyNotification.Number :=18;
      MyNotification.AlertBody := 'Delphi for your mobile device is here!';
      NotificationCenter1.PresentNotification(MyNotification);
  finally
    MyNotification.DisposeOf;
  end;
end;

它编译并运行。正如预期的那样，我确实必须在我的表单上创建 NotificationCenter1 作为 TNotificationCenter。它在 Android 下可以找到，但在 iOS 下我得到了 butkus。没有本地通知，没有图标，甚至没有错误。

它曾经在 XE8 下工作过吗？

XE8 和 10/Seattle 之间的本地通知有什么变化吗？

我的手机运行的是 iOS 9.2。 8.x 和 9.x 之间的 iOS 是否发生了某些变化，破坏了 Firemonkey 的本地通知？

Answer 1

我关注了 tutorial之前，它有效。

还有两个示例应用随 10 Seattle 一起提供。

• > Send Cancel Notifications
• > Set Reset Badge Number

我刚刚在 iOS 9.2 和 Delphi 10 Seattle Update 1 上尝试了这两个，它们按我的预期工作。 (也在 XE8 中工作)。您的代码看起来也正确。

也许在某些时候你告诉 iOS 不要向你显示通知。您是否检查了应用程序设置？