在Delphi 10 Seattle上接收iOS推送通知

Question

此处的主要目标是使用Delphi 10 Seattle为Push Notifications生成接收 iOS。

我正在尝试关注this video但到目前为止，我只能成功发送推送通知。

有this incredible tutorial帮助我更好地了解App ID，配置文件，证书，PEM文件，SSL连接等。这基本上就是我现在看到的方式（是的，那是真正的主板）：

但有趣的是关于我需要在Delphi链接的Provisioning Profile。 必须与APNS证书具有相同的反向域名。

我可以使用我在Delphi的Provisioning Profile的Apple会员中心创建的Push Support可视化Tools > Options > Provisioning。

但我无法在Project > Options > Provisioning看到任何不属于 iOS团队配置文件的配置文件，即使CFBundleIdentifier提供Version Info {1}}匹配来自Xcode的相同Bundle Identifier（App ID）。

如果我在Team Prefix上加Bundle ID，我只能运行该应用程序，但我觉得我一定做错了。

通知仅在应用程序具有与其链接的正确证书时才有效。

这就是我获取应用程序令牌的方式：

procedure TFormPush.Button1Click(Sender: TObject);

var

    FormPush          : TFormPush;
    APushService      : TPushService;
    AServiceConnection: TPushServiceConnection;

    ADeviceID   : string;
    AdeviceToken: string;

begin

    APushService := TPushServiceManager.Instance.GetServiceByName(TPushService.TServiceNames.APS);

    AServiceConnection        := TPushServiceConnection.Create(APushService);
    AServiceConnection.Active := True;

    ADeviceID    := APushService.DeviceIDValue[TPushService.TDeviceIDNames.DeviceID];
    AdeviceToken := APushService.DeviceTokenValue[TPushService.TDeviceTokenNames.DeviceToken];

    ShowMessage(AdeviceToken);

end;

我花了很多精力来到这里，但我仍未收到推送通知。

我必须犯的错误是什么？