1,183
社区成员
发帖
与我相关
我的任务
分享数据类型转化的问题
bArr:array[0..17] of byte=($FB,$00,$12,$02,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$02,$00,$00,$FE);
如何将bArr转为Pchar类型
如何将bArr转为Pchar类型
...全文
请发表友善的回复…
发表回复
aiirii 2005-11-02
- 打赏
- 举报
>>如何将bArr转为Pchar类型
可能有问题，到时会被截断了
可能有问题，到时会被截断了
linzhengqun 2005-11-02
- 打赏
- 举报
定义全局变量：
var
s: string;
p: PChar;
begin
SetLength(s, 18);
Move(bArr[0], PChar(s)^, 18);
Edit1.Text := s;
p := PChar(s);
Edit1.Text := P;
end;
但由于你的数据是一些非字符的，所以无法显示在Edit中。
如果你的数据变成是这样：
bArr:array[0..17] of byte=
($45,$57,$58,$59,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57);
就可以显示了。
var
s: string;
p: PChar;
begin
SetLength(s, 18);
Move(bArr[0], PChar(s)^, 18);
Edit1.Text := s;
p := PChar(s);
Edit1.Text := P;
end;
但由于你的数据是一些非字符的，所以无法显示在Edit中。
如果你的数据变成是这样：
bArr:array[0..17] of byte=
($45,$57,$58,$59,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57);
就可以显示了。
