简单问题：如何判断流对象（tmemorystream)已经被创建？？

Question

如：
　var
   stream:tmemorystream;
  begin
    if 流stream没有被创建 then
      stream:=tmemorystream.create;
.................................................
  end;

Answer 1

var
  a: TMemoryStream;
begin
  //是否已实例化
  if Assigned(a) then
  begin
  end;
  //是否有内容
  if a.Memory <> nil then
  begin
  end;
end;

Answer 2

csdn真慢，都快没心情回贴了，算了，以后少来了

Answer 3

var
  stream: TMemoryStream;
begin
  if not Assigned(stream) then
  begin
    stream := tmemorystream.create;
  end;  //是否有内容
  if stream.Memory <> nil then
  begin  end;end;

Answer 4

  if not Assigned(stream) then
  begin
    stream := tmemorystream.create;
  end;