[pgranados]

Buen día compañeros, estoy realizando una petición REST pero al obtener el Response tengo errores de autorización, la documentación del webservice donde me tengo que conectar menciona que tengo que agregar Authorization Type Basic Auth con el username y password en el formato USER:PASSWORD codificado en Base64

Pero no consigo que se logre la conexión, mi código es:

Código Delphi [-]

HTTP := TIdHTTP.Create(nil);
encoder: TBase64Encoding;

        encoder:=TBase64Encoding.Create();
        RequestBodyjson.SaveToFile(ExtractFileDir(ParamStr(0))+'\RequestCancelacion.txt');
        HTTP.ProxyParams.BasicAuthentication:= true;
        HTTP.Request.BasicAuthentication:= true;
        HTTP.Request.CustomHeaders.FoldLines := False;
        HTTP.Request.BasicAuthentication:=true;
        HTTP.Request.CustomHeaders.Values['Authorization']:= 'Basic '+encoder.Encode('USUARIO:CONTRASENA');

¿Alguna solución? Saludos