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;