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

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

Delphi字符串、PChar与字符数组之间的转换
设有如下三个变量：
var
s:string;
p:pchar;
a:array[1..20] of char;
那么三者之间的转换以下：
一、字符串到PChar
    p:=PChar(s);
二、PChar到字符串
    s:=p;
三、PChar到字符数组
    StrCopy(@a ,p);
四、字符数组到PChar
    PChar(@a);
五、字符串与字符数组之间的转换就只有经过PChar来中转了。例以下面这个例子：
procedure TForm1.btn1Click(Sender: TObject);
var
str:array[1..10] of char;
begin
StrCopy(@str ,PChar(mmo1.Text));
mmo2.Text:=PChar(@str);
end;