100分求一个简单问题，怎样将这三名话改写成object pascal,在线等，解决马上结帐？

Question

100分求一个简单问题，怎样将这三名话改写成object pascal,在线等，解决马上结帐？
这是c#写的，现在需要改成object pascal，
MemoryStream outStream = new MemoryStream();
outStream.Seek(0, SeekOrigin.Begin);
byte[] bytes = new byte[outStream.Length];

Answer 1

var outStream: TMemoryStream;
    bytes: array of byte;
begin
  outStream:=TMemoryStream.Create;
  outStream.Seek(0, soFromBeginning);
  SetLength(bytes,outStream.Size);
  //.....
end;

Answer 2

MemoryStream outStream = new MemoryStream();
改为
var outStream: TMemoryStream;
outStream := TMemoryStream.Create;
--------------------------
outStream.Seek(0, SeekOrigin.Begin);这句不用改
--------------------------
byte[] bytes = new byte[outStream.Length];
改为
var mByte: array of byte;
SetLength(mByte,outStream.Size);