Gracias Casimiro, por la ayuda pero añadi el evento y sigue dando el mismo error, probe cambiando la autentificacion y codificando en base64 el token
Código Delphi
[-]
procedure TForm1.HTTPRIO1HTTPWebNode1BeforePost(const HTTPReqResp: THTTPReqResp; Data: Pointer);
var
auth: string;
begin
auth := 'Authorization: Basic ' + token;
HttpAddRequestHeaders(Data, PChar(auth), Length(auth), HTTP_ADDREQ_FLAG_ADD);
end;