Delphi XE 中的 VaComm

VaComm in Delphi XE

我想在我的 Delphi 程序中使用 Comport,我正在使用 como 发送数据效果很好,但问题是接收数据。当它接收到数据时,系统应该调用过程 VaComm1RxChar,但它没有。这个程序从来没有运行。但是即使我通过函数 VaComm1.ReadBufUsed 检查缓冲区中是否有一些字符,它 returns 我也是一个值,所以一定有一些接收到的数据。

感谢您的帮助。

这是我的代码,它只包含两个:

procedure TForm2.VaComm1RxChar(Sender: TObject; Count: Integer);
var text: string;
begin
   text:=Vacomm1.ReadText;
   Memo1.Lines.Add(text);
   ShowMessage('Some data received!');
end;

procedure TForm2.Button1Click(Sender: TObject);

begin

   Vacomm1.WriteText('Hello');
   Memo1.Lines.Add('Hello');
   sleep(200);
end;

您确定收到了一些数据吗?您是否使用 Windows 类似终端的程序检查了正确的数据流?

端口是否打开?
检查 Vacomm1.OnRXChar 事件 属性 是否与您的 VaComm1RxChar 方法相关联
检查 ceRxChar 是否包含在 MonitorEvents 属性