Получить токен устройства Firebase для Android Delphi 10.2 - PullRequest
Новая
       12

Получить токен устройства Firebase для Android Delphi 10.2

0 голосов
/ 28 августа 2018

Я следую этому уроку http://thundaxsoftware.blogspot.com/2017/01/firebase-cloud-messaging-with-delphi.html для использования push-уведомлений, 

 {$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 пусто! но отображается идентификатор устройства, я использую тот же исходный код, который приведен в статье.

...