Delphi中 怎么将bytes 转换位steam 或者将bytes中的一部分数据转成integer,word
对Delphi不太了解 请大神教教我
Delphi中 怎么将bytes 转换位steam
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
1条回答
- 堕落恶魔_Delphi 2018-08-27 15:27关注
Bytes就是byte数组
stream就是提供了一个对内存的存取类integer在delphi里 一般表示32位有符号整形 也就是4个字节的数据
word是16位无符号整形无论是有符号还是无符号, 关键是字节长度, 有无符号只代表数据的读取方式及其代表的意义, 与数据内容无关
一般来说, 在win32环境下, 可以直接将bytes数据写入stream, 比如:
var b: TBytes; nMM: TMemoryStream; nBM: TBytesStream; i: Integer; w: Word; begin ....... {Bytes写入stream 因为bytes是byte数组, 所以用length获取长度} nMM.Write(b[0], Length(b)); {stream读取Bytes, l表示要读取的长度} SetLength(b, l); nMM.Read(b[0], l); {stream写入integer/word, 因为integer/word是基本类型, 所以直接使用sizeof获取长度写入} nMM.Write(i, SizeOf(i)); nMM.Write(w, SizeOf(w)); {stream读取integer/word} nMM.Read(i, SizeOf(i)); nMM.Read(w, SizeOf(w)); {因为数据的本质都是二进制字节数据, 在内存种是不区分数据类型的, 所以只需要吧数据值填入你想转换到的变量中就行 所以使用Move来将bytes转换为integer/word 这个例子里我从第一个数据开始转换, 所以下标是0, 如果你想从某个位置开始转换, 下标填写相应的位置 注意, Move建议只在win32环境下使用} Move(b[0], i, SizeOf(i)); Move(b[0], w, SizeOf(w)); {如果在android/ios种, 建议使用bytestream来读取} nBM := TBytesStream.Create(b); nBM.Read(i, SizeOf(i)); nBM.Read(w, SizeOf(w)); end;
本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 无用评论 打赏 举报
悬赏问题
- ¥15 如何在scanpy上做差异基因和通路富集?
- ¥20 关于#硬件工程#的问题,请各位专家解答!
- ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
- ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
- ¥30 截图中的mathematics程序转换成matlab
- ¥15 动力学代码报错,维度不匹配
- ¥15 Power query添加列问题
- ¥50 Kubernetes&Fission&Eleasticsearch
- ¥15 報錯:Person is not mapped,如何解決?
- ¥15 c++头文件不能识别CDialog