string和byte数组的相互转换～～

Question

需要作一个循环
S:string;
bs: array of byte;
begin
   S:='1234567';
   for i:= 0 to 6 do
   begin
       Bs:=ord(s[i+1]);
   end;
end;

Answer 1

对不起，写错了,应该是bs[i],后面的ord也可以用byte代替
S:string;
bs: array of byte;
begin
   S:='1234567';
   for i:= 0 to 6 do
   begin
       Bs[i]:=ord(s[i+1]);
   end;
end;

Answer 2

呵呵，谢谢，那byte数组转换成string就反之？

Answer 3

对呀，用的函数是char()
如char(65)的结果就是'A';

Answer 4

char(65)一般用 chr(65)
不甚感谢--》不胜感谢

Answer 5

可以用函数MOVE直接操作，而不必用循环实现