请问如何把缓冲中的数据原样读出

Question

定义了一个结构PicStatus
包含有这样的一些结构成员
   iPicType：integer;
   iWidth:integer;
   iHeight:integer;
   name:Pchar;
把这些数据存放到pBuf（Pchar类型）为首址的缓冲中，请问用什么函数或办法把这些结构体中的数据
原样读出来

Answer 1

分配空间
然后 把这个pBuf中的数据用Move读取到你的空间中
然后用 PicStatus对你的空间进行强行类型转换 type PPicStatus = ^PicStatusl
var
pMyBuf:PChar;
pRec: PPicStatus;pMyBuf := new(PChar);Move(pBuf, pMyBuf, sizeof(PicStatus);
pRec := PPicStatus(pMyBuf); // delphi的类型转换不是很清楚 你可能还要试一下
ShowMessage(IntToStr(pRec.iWidth));// 还有你定义的结构中的 name 最好用定长的数组 这样比较简单一些 不然你要多注意