将图片以流的方式保存到String变量stra就出错了????

Question

将图片以流的方式保存到String变量stra就出错了????
var
  //sCord:studentrecord;
  T1,t2:TStream ;
  fh:integer;
  stra:string;
begin
  t1:=TFileStream.Create('0c.jpg', fmOpenRead or fmShareExclusive);      //保存jpg格式的图片要快很多.
  T2:=TMemoryStream.Create;
  showmessage('文件大小为:'+inttostr(t1.Size));
  EncodeStream(t1,t2);        //编码
  t2.Position :=0; //必需要的
  memo1.Lines.LoadFromStream(t2); //显示编码后的内容
  stra:=t2;  //==================>>>>>>>>>>>>>出错了
  t1.Free;
  t2.Free;
end;
[错误] Unit1.pas(45): Incompatible types: 'String' and 'TStream'

Answer 1

'String' and 'TStream'
如何互相转换.......................

Answer 2

//stra:=t2;  //==================>>>>>>>>>>>>>出错了 SetString(stra,t2.Memory,t2.Size);  //==================>>>>>>>>>>>>>出错了 

Answer 3

[错误] Unit1.pas(46): Undeclared identifier: 'Memory'

Answer 4

保存时使用先保存字符串长度，再保存。
读时按照长度读到PChar里，再转成String。

Answer 5

SetString(stra,TMemoryStream(t2).Memory,t2.Size); 

Answer 6

此帖子,根据要求重新整理如下地址帖子,请各位多多赐教谢谢了
http://topic.csdn.net/u/20100106/12/6049d842-a7eb-4c77-ab58-bdd4cfd2a51c.html