delphi:string，PChar，Array of Char ，Array of Byte 之间的转换

var
    s:string;
    p:PChar;
    a:array[1..10] of char;
    b:array[1..10] of byte;
   
转换：
1.string 到 PChar
p:=PChar(s);

2. PChar 到 string
s:=p;

3. PChar 到 array
StrCopy(@a,p);

4. array 到 PChar
p:=PChar(@a);

5.string 到 array of char 
p:=PChar(s);
StrCopy(@a,p);

6. string 到 array of byte （未验证）
  s:='hello';
  SetLength(b,Length(s)+1);
  p:=PChar(s);
  CopyMemory(b,p,Length(s)+1)
  
7. array of byte 到 array of char 
  for i := 1 to 10 do
  begin
    a[i] := Char(b[i]);
  end;