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;