tstream的问题？

Question

[Error] Unit1.pas(47): Unsafe pointer variables, parameters or consts only allowed in unsafe procedure
为什么常常总是提示错误的，代码如下：procedure TForm1.Button1Click(Sender: TObject);
  var
    ms:tfilestream;
    byttext:array of char;
    pos:pointer;//错误
begin
  ms:=tfilestream.Create(path,fmopenread);
  setlength(byttext,ms.Size);
  edit1.Text:=ms.Read( pos,ms.Size );
end;

Answer 1

setlength(byttext,ms.Size);
ms.poition :=0 ;
  edit1.Text:=ms.Read( pos,ms.Size );