實現超級終端的串口通信

Question

我有一个设备要从COM口传送数据进来，我现在是用的超级终端来接受的数据捕捉下来再入库的，现在我想通过spcomm来实现数据的接受入库
我接受的数据的每行数据是80个字符，我用spcomm的ReceiveDate来接受数据，但编译后总是报错，不知道是否有错在哪里，我的波特率9600，比特位为8，停止位1，这些我想应该没有什么问题，是不是我接受的程序不对：
procedure TForm1.Comm1ReceiveData(Sender: TObject; Buffer: Pointer;
  BufferLength: Word);
var
  RecBuf: array of Byte;begin
  setlength(RecBuf,BufferLength);
  move(Buffer^,RecBuf,BufferLength);  memo1.Lines.Add(Pchar(RecBuf));
end;请大家看看有什么问题，是不是还有什么格式问题

Answer 1

解决了，代码改了一下就好了
procedure   TForm1.Comm1ReceiveData(Sender:   TObject;   Buffer:   Pointer; 
    BufferLength:   Word); 
var 
    RecBuf:   array   of   Byte; begin 
    setlength(RecBuf,BufferLength); 
    move(Buffer^,pchar(RecBuf)^,BufferLength);     memo1.Lines.Add(RecBuf); 
end;