Byte 数组转字符串 - 回复

Byte 数组转字符串 - 回复 "不知道" 问题

问题来源: https://blog.51cto.com/u_14617575/2747904

---

var
  bs: array[0..25] of Byte;
  s: string;
  i: Integer;
begin
  for i := 0 to Length(bs) - 1 do bs[i] := 65+i;
  s := string(StrPas(PAnsiChar(@bs)));
  ShowMessage(s); {ABCDEFGHIJKLMNOPQRSTUVWXYZ}
end;