帮忙：使用TMemoryStream类ReadBuffer时出错？

Question

var
  Stream: TMemoryStream;
  buffer:array of byte;
  size:integer;
begin
   stream:=tmemorystream.Create;
   stream.LoadFromFile('c:\dd.txt');
   size:=stream.size;
   setlength(buffer,size);
   stream.read(buffer,size); 
   stream.Free;
   strstream.Free;
end;调试时buffer开始长度为11,后经read方法后不是11,然后是程序报错。
我用的是dephi7,难道是bug?

Answer 1

stream.read(buffer,size);
->
stream.read(buffer[0],size);