【发布时间】:2015-11-06 13:19:24
【问题描述】:
我正在使用 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];
使用此代码,应用会收到推送通知,但在运行时不会收到。
【问题讨论】:
-
这不适用于 Delphi 10 Seattle。你能提供一个代码示例吗?
标签: ios delphi push-notification delphi-10-seattle