delphi中BYTE数组和String之间怎样相互转换 – PHP基础 – 前端 php tcp 并发连接

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;