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

var
    s:string;
    p:PChar;
    a:array[1..10] of char;
   
转换：
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
p:=PChar(s);
StrCopy(@a,p);