// A un String SetLength(Str,MemoryStream.Size); MemoryStream.Write( PChar(Str)^, MemoryStream.Size);
// A un memo Memo1.Lines.LoadFromStream(MemoryStream);