关于delphi中TStreamMemory 将byte数组写入流中和把流中数据写入byte数组中
var
mStream : TStreamMemory;
bytVal1,bytVal2 : array[0..5]of byte;
i :integer;
begin
for i:=0 to 5 do
begin
bytVal1[i] := 90+i;
end;
fillchar(bytVal2,Sizeof(bytVal2),0);
mStream := TStreamMemory.Create();
mStream.Position :=0;
mStream.WriteBuffer(bytVal1[0],length(byteval1));
mStream.Read(bytVal2[0],mStream.Size);
end;
//上面这个例子,出现的问题是:将数组1的数据写入流中,数据流的大小变为6,但读出数据到数据2确一个数据也没有填充进去。是不是写入没成功,如果没成功数据流大小为什么会是数据1的长度。