Galera tenho essa função para converter um arquivos XML em bytes, mas após 
convertido naum sei salva no HD, alguém sabe como fazer?

var
    Stream: TFileStream;
begin
    // Converter em byte    
    Stream := TFileStream.Create('C:\MeuArquivo.XML', fmOpenRead);
    Stream.Seek(0, soFromBeginning);

    // Aqui eu deveria salvar para o HD.


    Stream.Free;
end;

Agradeço qualquer ajuda.


Sergio Kawahara

[As partes desta mensagem que não continham texto foram removidas]

Responder a