Hola frankizzio.
Cita:
Empezado por frankizzio
...
La documentación del web service especifica que la respuesta es un arreglo de bytes de base64,
|
No se si tendrá que ver con el error, pero si tenes que trabajar en base 64 intenta de este modo:
Código Delphi
[-]
uses Types;
function StringToBDA64(str: AnsiString): TInt64DynArray;
begin
SetLength(Result, Length(str));
Move(str[1], Result[0], Length(str));
end;
function BDA64ToString(bda: TInt64DynArray): AnsiString;
begin
SetString(Result, PAnsiChar(@bda[0]), Length(bda));
end;
procedure BDA64ToFile(bda: TInt64DynArray ; const FileName: string);
begin
with TMemoryStream.Create do
try
Write(bda[0], Length(bda));
SaveToFile(FileName);
finally
Free;
end;
end;
Saludos