注:TMemoryStream中有二进制数据。

解决方案 »

  1.   


      Memo1.Lines.LoadFromStream(MemoryStream);
      

  2.   

    可是memorystream中有二进制数据,如上导入时,会有数据丢失!
      

  3.   

    MemoryStream.Read(Str, MemoryStream.Size)
      

  4.   

    我是用length(string1)来检查其长度时发现数据丢失的。
      

  5.   

    那要看你如何写入流了
    var
      str:string;
      mstream:Tmemorystream;
    begin
      str:='123456';
      mstream:=Tmemorystream.create;
    //写
      mstream.position:=0;
      mstream.write(pointer(str)^,length(str));
    //读
      mstream.positon:=0;
      mstream.read(pointer(str)^,mstream.size);
      mstream.free;
    end;