Einzelnen Beitrag anzeigen

Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
673 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Remote Push-Nachrichten iOS und Android

  Alt 19. Apr 2021, 09:56
Zur Frage : Ja, kannst Du einfacher http request zu Google, der sendet das dann aus zu den Geräten. sind max 10 Zeilen.

bei mir sieht das so aus :

Code:
procedure TDMRTC.SendMobileNotification(const ADestino, AMessage: String);
begin
  RtcDataRequest.Request.Method := 'POST';
  RtcDataRequest.Request.FileName:='/fcm/send';
  RtcDataRequest.Request['Content-Type']:='application/json';
  RtcDataRequest.Request['Authorization']:='key=XXXXXXXXXXX'; // your key
  With RtcDataRequest.Request.Info.newRecord('data') do begin
    asText['to']:= ADestino;
    with newRecord('data') do
      asText['message'] := AMessage;
    end;
  RtcDataRequest.Post;
end;
Das ist mit RealThinClient gemacht, aber das geht garantiert auch mit Indy oder so.
  Mit Zitat antworten Zitat