spcomm的问题？请高手指点

Question

spcomm怎么样取出接受到的数据！下面是我的代码,编译的时候提示[Error] Unit1.pas(96): Pointer type required
procedure Tfcomm.Comm2ReceiveData(Sender: TObject; Buffer: Pointer;
  BufferLength: Word);
  var
  i:integer;
  rbuf:array[0..10] of byte;
  viewstring:string;
begin
   viewstring:='';
   move(buffer^,pchar(@rbuf^),bufferlength);
   for i:=1 to bufferlength do
      viewstring:=viewstring+inttohex(rbuf[i],2)+'';
  viewstring:='接收' + viewstring;
 memo1.lines.add(viewstring);
 memo1.lines.add('');
 Memo1.Lines.Add(inttostr(i));
end;

Answer 1

人气呢！CSDN？？？？？？？？？？？？？？

Answer 2

将move(buffer^,pchar(@rbuf^),bufferlength);改为
move(buffer^,pchar((@rbuf)^),bufferlength);即可