delphi中String，PChar，PByte，Array of Char，Array of Byte 转换

delphi中String，PChar，PByte，Array of Char，Array of Byte 转换 vars:string; pc:pchar; pb:pbyte; ac:array[1..100] of char; ab:array[1..100] of byte; i:integer; begin   s:='this is a test';   pc:=pchar(s); //string->pchar   pb:=pbyte(pc); //pchar->pbyte   for i:=1 to length(s) do   begin     ac[i]:=s[i]; //string->arrary of char     ab[i]:=byte(s[i]); //string->arrary of byte   end;   s:=pc; //pchar->string   s:=string(pb); //pbyte->string   s:=c; //arrary of char->string; end;