Delphi字符串、PChar与字符数组之间的转换

var

  s: string;

  p: pchar;

  a: array[1..20] of char;

1、字符串 ---> PChar

  p := PChar(s);

2、PChar ---> 字符串

  s := p;

3、PChar ---> 字符数组

  Strcopy(@a ,p);

4、字符数组 ---> PChar

  PChar(@a);

5、字符串 ---> 字符数组

ottom:0px; margin-top:8px; margin-bottom:8px; line-height:23px; letter-spacing:0.5px; font-size:13px; color:rgb(51,PChar(s));

6、字符数组 ---> 字符串

  s := PChar(@a);

【注】字符串和字符数组之间的转换借助 PChar 做中转;