Así "a ojo" sin ver lo que recibes, prueba esto:
Código Delphi
[-]procedure DescargarEtiquetas(crutafichero: string);
var
FStream: TFileStream;
bytes: TBytes;
begin
bytes := TNetEncoding.Base64.DecodeStringToBytes(TEtiquetaEnvioRespuesta.GetEtiquetaEnvioResult.EtiquetaFile) ;
if Length(bytes) > 0 then
begin
FStream := TFileStream.Create(crutafichero, fmCreate);
try
FStream.WriteBuffer(bytes[0], Length(bytes));
finally
FStream.Free;
end;
end;
end;