设有以下三个变量: 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;
|
请发表评论