用spcomm进行串口通讯，抄来一段程序，为何发送成功后不能接收。

Question

我用过，感觉直接用 s:=strpas(buffer);接收Ascii字符理好！

Answer 1

波特率=4800
bytesize=_8
commname=COM1
stopbits=_1
parity=none

Answer 2

串口通讯要两个串口对接在一起然后才可以工作的。
另外把procedure senddata里的sleep(2);去掉。

Answer 3

发送过程应该如下：procedure TForm1.Comm1ReceiveData(Sender: TObject; Buffer: Pointer;BufferLength: Word);
var
s: string;
i:integer;
begin
  Move(Buffer^, PChar(rbuf)^, BufferLength);
  for i:=1 to bufferlength do
    s:=s+inttohex(rbuf[i],2)+''; 
  s:='发送'+s;
  Memo1.Lines.Add(S);
  Memo1.Invalidate;
end;