delphi中BYTE数组和String之间怎样相互转换？
var
arrBYTE: array[0..2] of Byte;
str1: string;
i: Integer;
begin
for i := 0 to Length(arrbyte)-1 do
str := str + IntToStr(arrbyte[i]);//byte[] to string;
for i := 0 to Length(str)-1 do
arrbyte[i] := Byte(str[i]);//string to byte[]
StrCopy(PChar(@arrbyte),PChar(str));//string to byte[]
end;
