1.String转化成PChar

例：

var

  str: string;

  pStr:PChar;

...

pStr := PChar(str);

2.PChar转String

例:

var

  pStr:PChar;

  str:string;

...

str := strPas(pStr);