char与sting怎么转换呢？

Question

WideString1 := WideString1 + Chr(Ord(buf[i + 1]) + Char1));
//buf: array[0..1000] of Char;
我这句话对吗？

Answer 1

WideString1 := WideString1 + WideString(buf[i + 1] + Char1)
这样就OK了。

Answer 2

不对
 WideString1 := WideString1 + inttostring(inttostring(ord(buf[i + 1]) + Char1));

Answer 3

for i := 0 to 1000 do
begin
  WideString1 := WideString1 + buf[i];
end;

Answer 4

to gamaster(a明)
   你的好像也不对吧！为什么用两次inttostring呀！是不是写错了呀！

Answer 5

SetLength(WideString1, sizeof(buf));
Move(buf, WideString[1], sizeof(Buf));