获取Firebase设备令牌android delphi 10.2

我遵循本教程使用推送通知

 {$IFDEF ANDROID}
   PushService := TPushServiceManager.Instance.GetServiceByName(TPushService.TServiceNames.GCM);
  PushService.AppProps[TPushService.TAppPropNames.GCMAppID] := '71553856XXXX';
{$ENDIF}
  ServiceConnection := TPushServiceConnection.Create(PushService);
  //ServiceConnection.Active := True; //Update
  ServiceConnection.OnChange := OnServiceConnectionChange;
  ServiceConnection.OnReceiveNotification := OnReceiveNotificationEvent;
  ServiceConnection.Active := True; 

  DeviceId := PushService.DeviceIDValue[TPushService.TDeviceIDNames.DeviceId];
  DeviceToken := PushService.DeviceTokenValue[TPushService.TDeviceTokenNames.DeviceToken];
  Memo1.Lines.Add(DateTimeToStr(Now) + ' DeviceID: ' + DeviceId);
  Memo1.Lines.Add(DateTimeToStr(Now) + ' FCM Token: ' + DeviceToken);
  Memo1.Lines.Add(DateTimeToStr(Now) + ' Ready to receive!');

---

值

DeviceToken

为空！但是显示了设备id，我使用的源代码与文章中附带的源代码相同。

在分配事件处理程序之前，您在ServiceConnection上将Active设置为True。您应该在分配事件handlersstill blank token@davenottage之后进行设置顺便说一句，如果您想使用firebird消息传递，可以在此处查看实现：。您已经有了一个可用的演示（ALFirebaseMessagingDemo.apk）