MemoryStream并构造一个字节数组

时间:2012-05-09 11:09:41

标签: delphi memorystream

我正在使用MemoryStream来构造我需要发送到服务器的字节数组。我有以下问题:

1)有没有比这更好的方法来构造字节数组?

2)为什么这些代码会在我的内存流中写入虚假内容?

var
  serial : word;
  MS : TMemoryStream;
const
  somebytes : array [0..1] of byte = ($72,$72);
...
begin
      MS := TMemoryStream.Create();
      try
      MS.Write(somebytes[0],2);
      serial := $3E6C;
      MS.Write(serial,2);
      finally
      MS.Free;
end;

使用调试器我看到在流中添加了值$ 6F32而不是$ 3E6C。

3)如果我打电话

MS.Position := 2;

然后我访问PByte(MS.Memory)^为什么我得到流中的第一个字节而不是第三个?

1 个答案:

答案 0 :(得分:9)

  

有没有比这更好的方法来构造字节数组?

在我看来,这是一种非常合理的方式。


  

我看到在流中添加了值$ 6F32而不是$ 3E6C。

再次检查。实际上添加了正确的值。但要注意小端数据类型的陷阱。按顺序添加到流中的4个字节是:72美元,72美元,6美元,3美元。


  

为什么我得到流中的第一个字节而不是第三个字节?

因为Memory属性始终引用流的开头。它没有考虑流的当前位置。