chenyitao736866376
FlyingO123
2018-08-27 14:44
采纳率: 80%
浏览 1.5k
已采纳

Delphi中 怎么将bytes 转换位steam

Delphi中 怎么将bytes 转换位steam 或者将bytes中的一部分数据转成integer,word
对Delphi不太了解 请大神教教我

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

1条回答 默认 最新

  • hskill
    堕落恶魔_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;
    
    
    点赞 评论

相关推荐