delphi中缓冲区A和缓冲区B相加,放入缓冲区C中,用哪个函数?

Question

rt

Answer 1

var
 A:array[1..6] of char;
 B:array[1..4] of char;
 C:array[1..9] of char;
 p:pchar;
begin
  move('abcde'+#0,A,6);//初始化A         A:'a','b','c','d','e',#0
  move('123'+#0,B,4);  //初始化B         B:'1','2','3',#0
  p:=@C;               //置指針指向C
  zeromemory(p,9);     //初始化C(值清零,即清為空串) C:#0,#0,#0,#0,#0,#0,#0,#0,#0
  copymemory(p,@A,5);  //將A複製給C      C:'a','b','c','d','e',#0,#0,#0,#0
  inc(p,5);            //移指針以置於當前C串尾部 
  copymemory(p,@B,3);  //將B複製給C並置於尾部 C:'a','b','c','d','e','1','2','3',#0
end;

Answer 2

如果p是pointer类型,怎么操作?
inc(p,5);   怎么编译错误?