Ir para o conteúdo principal

PEX - Função LerBase64 e transforma no arquivo fisico

Está função é utilizada para gerar arquivos físicos de conteúdos base64.

Ela recebe dois parâmetros, o conteúdo base64 e o caminho a qual irá ser criado. o caminho deve conter o nome do arquivo e extensão do mesmo como por exemplo : C:\Temp\ArquivoAssinado_/*IDPROCESSO*/.pdf, neste caso ele irá criar o arquivo na pasta Temp com o nome ArquivoAssinado_1.pdf 

procedure pex_LerBase64(const Conteudo, Caminho : String);
var
  loStream: TBytesStream;
begin
  loStream := TSO.Decode64(Conteudo);
  try
    loStream.SaveToFile(Caminho);
  finally
    loStream.Free;
  end;
end;

Ela pode ser criada pelo desenvolvimento, caso necessário, e utilizar em eventos como  PEX - Executar função para criar dinamicamente um ou mais arquivos.