您的位置：程序门 -> delphi -> 网络通信/分布式开发

實現超級終端的串口通信

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

實現超級終端的串口通信

发表于：2007-11-06 13:51:08 楼主

我有一个设备要从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;

请大家看看有什么问题，是不是还有什么格式问题

发表于：2007-11-06 14:21:511楼得分:0

在線等，大家幫幫忙

发表于：2007-11-07 09:09:072楼得分:0

一直在线，大家帮帮忙，急用

发表于：2007-11-07 09:31:223楼得分:0

解决了，代码改了一下就好了
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;

下一篇：如何利用delphi构建gps平台
上一篇：为什么用idtcpclient发送16进制流数据，接收不到数据？

其他资讯