ios - Delphi 10 Seattle での iOS プッシュ通知の受信

Question

ここでの主な目標は、Delphi 10 Seattleを使用して生成および受信することです。 Push NotificationsiOS

このビデオをフォローしようとしていますが、これまでのところ、プッシュ通知を正常に送信することしかできませんでした.

アプリ ID、プロビジョニング プロファイル、証明書、PEM ファイル、SSL 接続などについて理解を深めるのに役立つこの素晴らしいチュートリアルがあります。これは基本的に私が今見ている方法です（はい、それは実際のボードです）：

しかし、面白いことに、Delphi でリンクする必要があるプロビジョニング プロファイルについてです。APNS 証明書と同じ逆引きドメイン名でなければなりません。

Delphi の Apple のメンバー センターで作成したProvisioning Profilewithを視覚化できます。Push SupportTools > Options > Provisioning

しかし、提供された atが Xcode からの同じバンドル ID (アプリ ID) と一致するにもかかわらず、iOS Team Provisioning Profileに属していないプロビジョニング プロファイルを表示できません。Project > Options > ProvisioningCFBundleIdentifierVersion Info

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;

ここにたどり着くまでにかなりの労力を要しましたが、まだプッシュ通知を受け取ることができません。

私がしなければならない可能性のある間違いは何ですか？