如何把tmemorystream对象 完整的拷贝到令一个tmemorystream对象??

Question

constructor MyThread.Create(mstream:Tmemorystream);
begin
  Inherited Create(True);
  mstream.Position:=0;
  mThreadstream.CopyFrom(mstream,mstream.Size);
  Resume;
end;为什么我这么写拷贝老是有问题呢?读出来mThreadstream的数据不是空就是怪异符号

Answer 1

constructor   MyThread.Create(mstream:Tmemorystream); 
begin 
    Inherited   Create(True);
    Assert(Assigned(mstream));
    Assert(mstream.size<>0);
     
    mstream.Position:=0;
    Assert(Assigned(mThreadstream)); 
    mThreadstream.CopyFrom(mstream,mstream.Size); //这个mThreadStream在哪里创建？
    Assert(mstream.Size=mThreadstream.Size);
    Resume; 
end;