Hola,
necesito unir dos MemoryStream en un tercero y guardar este último como un fichero. Cargo el primero pero no se añadir al final del primero el segundo memoryStream:
Código:
procedure UnirArchivos( nFile1, nFile2, nFileOut: string );
var
File1,File2,FileOut: TMemoryStream;
begin
File1 := TMemoryStream.Create;
File2 := TMemoryStream.Create;
FileOut := TMemoryStream.Create;
File1.LoadFromFile(nFile1);
File2.LoadFromFile(nFile2);
FileOut.LoadFromStream(File1);
// Aquí tengo que copiar File2 al final de FileOut
FileMpo.SaveToFile(nFileMPO);
FileL.Free;
FileR.Free;
FileMPO.Free;
end;
¿Pueden ayudarme?
Gracias y saludos...
Miguel Angel