如何向TMemoryStream中增加内容？

Question

我的TMemoryStream中已经有内容，我想向其中增加内容怎么办？

Answer 1

将其指针移动到你需要开始增加内容的地方，然后Write。即首先设置TMemoryStream.Position————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

1、Size:此属性以字节返回流中数据大小。
2、Position:此属性控制流中存取指针的位置。
Tstream中定义的虚方法有四个：
1、Read:此方法实现将数据从流中读出。函数原形为：
Function Read(var Buffer;Count:Longint):Longint;virtual;abstract;
参数Buffer为数据读出时放置的缓冲区，Count为需要读出的数据的字节数，该方法返回值为实际读出的字节数，它可以小于或等于Count中指定的值。
2、Write:此方法实现将数据写入流中。函数原形为：
Function Write(var Buffer;Count:Longint):Longint;virtual;abstract;
参数Buffer为将要写入流中的数据的缓冲区，Count为数据的长度字节数，该方法返回值为实际写入流中的字节数。该满足了吧？

Answer 3

var s:TmemoryStream;begin  s:=TmemoryStream.creat;
  s.position:=0;
  s.write(pointer,size)end;查查delphi的帮助，里面很详细的