字串、PChar與字元數組(delphi)

設有以下三個變數：
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、字串與字元數組之間的轉換就只有通過PChar來中轉了。例如下面這個例子：
procedure TForm1.btn1Click(Sender: TObject);
var
  str:array[1..10] of char;
begin
  StrCopy(@str,PChar(mmo1.Text));
  mmo2.Text:=PChar(@str);
end;