Spcomm控件的問題

procedure TFcomm.Comm1ReceiveData(Sender: TObject; Buffer: Pointer;
  BufferLength: Word);
  var
  i:integer;
begin
viewstring:='';move(buffer^,pchar(@rbuf^),bufferlength);//(94)行提示的錯誤信息是;
[Error] spcctest.pas(94): Pointer type required
其中(94)行就是上面標記的地方.
前面的變量聲明部分如下;
var
  Fcomm: TFcomm;
  Viewstring:string;
  i:integer;
  rbuf,sbuf:array[1..6] of byte;