如何将指针中的数据转换成string型?急!谢谢大家!!!

Question

例:
var 
  msgbuf:array[0..4095] of byte;
  stackbuf:pointer;
  msglen:integer;
begin
  .....
  ....
  msglen:=integer(sendbuf[0]+(sendbuf[1] shl 8));
  getmem(stackbuf,msglen);
  move(msgbuf[0],stackbuf^,msglen);
  tmpstr:=inttostr(integer(stackbuf));
  ...
end;
为什么不对呢？不能显示出来呢？是不是inttostr(integer(stackbuf));写错了呢？
请大家帮帮忙，谢谢大家！！！！

Answer 1

inttostr(integer(stackbuf));不能转换指针吧。
move(msgbuf[0],stackbuf^,msglen);
改为：move(stackbuf^,msbuf,msglen);
这句吧指针的内容传给了数组msgbuf,
如果你传得是ascii码，需要把数组的byte型数据用char()转变为字符。把字符加起来就是字符串了

Answer 2

inttostr(integer(stackbuf));
错误 
应该是
inttostr(integer((stackbuf)^))