Hola amigos del foro, estoy obteniendo unos datos de un webservice por medio de un archivo Json, en el se encuentra codificado un archivo pdf, un xml y un zip
para obtener el pdf utilizo el siguiente procedimiento
Código Delphi
[-]procedure TForm1.Button3Click(Sender: TObject);
var
decode: TIdDecoderMIME;
stream: TMemoryStream;
begin
Memo4.Text := RESTResponse2.JSONValue.ToJSON;
ParseJSON(RESTResponse2.JSONValue as TJSONObject);
decode := TIdDecoderMIME.Create(nil);
stream := TMemoryStream.Create;
decode.DecodeStream(Memo2.Text, stream);
stream.SaveToFile('documento.pdf');
FreeAndNil(decode);
FreeAndNil(stream);
end;
estos archivos vienen codificados en base64.
Lo que no he podido es obtener el archivo zip
Gracias por su tiempo
Gustavo Cruz