enviar notificacion push desde pc con firebase en delphi
 

buen dia tengo una applicacion realizada con delphi 11 para movil configurada para recibir notificaciones push con firebase.
cuando el usuario inicia la aplicacion en el mobil yo capturo y guargo en la base de dato el Divice ID y el Token. Ahora bien, tengo otra aplicacion VCL donde quiero de alguna forma enviar notificacion Push a un usuario en especifico que ya existe en la base de dato donde tengo su token y su ID. he buscado en internet la forma correcta de hacerlo pero no he conseguido nada. si alguno del foro ya ha logrado hacer eso donde en tiempo de ejecucion logre enviar notificacion push agradeceria mucho una orientacion y si existiera algun ejemplo seria genial.

A ver si te sirve este hilo:
https://www.clubdelphi.com/foros/sho...light=firebase

no hay nada que me idique como enviar notificaciones a un dispositivo en especifico en tiempo de ejecucion. yo desarrolle mi aplicacion con firebase y pensando que lo podia usar de esta forma guargo en una tabla rl yoken y el devise id ademas de asociar este token y device a un nombre de usuario. lo que pretendo hacer es enviarle una notificacion a un usuario en especifico en tiempo de ejecucion ninguna pagina o investigacion que realice me dice como hacerlo, el todas partes te dicen como enviar notificaciones a todos los dispositivo pero no como hacerlo a uno en especifico en tiempo de ejecucion.

Enviar notificaciones Push desde Escritorio
 

hola amigos estoy haciendo una aplicacion que me permite enviar notificaciones push a dispositivo. mi desarrollo esta hecho el delphi 11 con notificaciones push en firebase, ya tengo instalada sdk en el telefono y recibe perfecto cuando mando las notificaciones desde firebase. ahora paso el codigo en un evento on click para enviar la notificaciones a movil, donde en edit coloco el token del dispositivo y en el memo un mensaje:

Código Delphi [-]
var
  Msg: string;
  s1, s2: TMemoryStream;
  hd: TArray ;
  st: String;
  b: TBytes;
  devicetoken: string;

begin
  deviceToken := Trim(EditToken.Text);

  Msg := 'Mi primer notificación Push.';

  s1 := TMemoryStream.Create;
  s2 := TMemoryStream.Create;

  try
    NetHTTPClient1.ContentType := 'application/json';

    st := '{' +
        '"to": "'+deviceToken+'",' +
        '"notification":{"priority":"hight",' +
        '"title":"Título de la Notificación",'+
        '"body":"'+Msg+'",'+
        '"dry_run":"false"}'+
      '}';

    setlength(hd, 1);

    b := TEncoding.UTF8.GetBytes(st);

    s1.Write(b, length(b));
    s1.Position := 0;

    hd[0].Name:='Authorization';
    hd[0].Value:='AAAAxZyP0LM:APA91bErnP8pAKD2x**************************************************************  **********************************An7GMJq6QUvXjrZgR_Rr3fxC2z';

    NetHTTPClient1.Post('https://fcm.googleapis.com/fcm/send', s1, s2, hd);

    s2.Position := 0;

    { Mostramos el resultado devuelto por FCM }
    memoGCM.Lines.LoadFromStream(s2, TEncoding.UTF8);
  finally
    s1.Free;
    s2.Free;
  end;
end;

el enviar el mensaje me sale un error que dice que le falta autorizacin y aunque he investigado como y en donde colocar esta aurorizacion ademas de no logro entender de que autorizacion se trata y en donde encontrarla, a comtinuacion le envio el mensaje de error:
alguien puede ayudarme con eso porque en firebase todo es super confuso.

solucionado le falto algo a la cadena

Código Delphi [-]
hd[0].Value:='key=AAAABv0qrXo:APA91bGA*********************************************************pXVEbr'

Gracias por compartir la solución

Saludps