情况:
1.电脑的2个串口用RS232连接线相连。
2.使用串口调试助手打开COM2,每隔5秒向COM1以16进制发送50个字节,以0DH结尾。
3.编写Delphi程序,打开COM1,定义 ByteReceive : array[0..49] fo Byte 数组变量接收此字符串。问题
1.如何将ByteReceive数组转换成字符串?
我的方法:
var
ByteReceive: array[0..49] of Byte;
PT:PByte; {字节指针}
begin
Comm1.ReadInputByte(PT); {将PT指向接收到的字符串地址)
for i:= 0 to 49 do
begin
ByteReceive[i]:= PT^;
inc(PT);
end;
此后就不知道如何将ByteReceive[i]转换成字符串了。2.如何提取ByteReceive数组某些位置的字节转换成字符串?
例如: 提取ByteReceive[23]到ByteReceive[28]这些字节组成的字符串。
1.电脑的2个串口用RS232连接线相连。
2.使用串口调试助手打开COM2,每隔5秒向COM1以16进制发送50个字节,以0DH结尾。
3.编写Delphi程序,打开COM1,定义 ByteReceive : array[0..49] fo Byte 数组变量接收此字符串。问题
1.如何将ByteReceive数组转换成字符串?
我的方法:
var
ByteReceive: array[0..49] of Byte;
PT:PByte; {字节指针}
begin
Comm1.ReadInputByte(PT); {将PT指向接收到的字符串地址)
for i:= 0 to 49 do
begin
ByteReceive[i]:= PT^;
inc(PT);
end;
此后就不知道如何将ByteReceive[i]转换成字符串了。2.如何提取ByteReceive数组某些位置的字节转换成字符串?
例如: 提取ByteReceive[23]到ByteReceive[28]这些字节组成的字符串。
解决方案 »
- MSCOMM控件在客户机上怎么实现代码注册
- Delphi中怎么获取和处理摄像机摄取的图像,可否像录像一样保存到硬盘里面.....帮顶有分!
- 用过fastscript的请进,高分相送,up也有分!
- 中间层自定义函数调用
- delphiv60 +Access2000中,ADOQuery中分支(IF)计算判断SQL语句如何写?
- 怎样读取OleVariant类型的 网页头部(Headers)??
- 找mp3控件的源码难吗????
- Tquery组件参数的使用方法(请用插入记录的例子说明)
- 关于数据库中的图片。
- 如果你认为你是高手,就请进!!!
- 学校实习要做一个出版社管理信息系统,那位高手有源码可否借小弟一用(散分)
- 请问为什么不能执行???
var
S: String;
PT: PByte; {字节指针}
I: Integer;
begin
Comm1.ReadInputByte(PT);
SetLength(S, 50);
for i:= 1 to 50 do
begin
S[i]:= Chr(PT^);
inc(PT);
end;
end;————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
Copy(S, 24, 28-24+1);————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————