我正在使用 Delphi Rad Studio Seattle 10 构建 iOS 应用程序。此应用程序必须接收推送通知。这对我有用,但是当应用程序运行时,它确实会收到任何通知。我做错了什么?
这是代码:
var
APushService: TPushService;
AServiceConnection: TPushServiceConnection;
ADeviceID, AdeviceToken: String;
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];
使用此代码,应用程序会收到推送通知,但在运行时不会。