天天看點

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;