标签：
直接给一个源码的例子，自己去看
procedure TForm1.Button1Click(Sender: TObject);
var
S_Str: String;
P_Str: PChar;
begin
GetMem(P_Str; Sizeof(Char)*20);
S_Str:= ‘I love China‘;
P_Str:= PChar(S_Str);
S_Str:= ‘‘;
S_Str:= String(P_Str);
ShowMessage(S_Str);
FreeMem(P_Str);
end;
Delphi中String和PChar指向的内存中的字符串的互相转换
标签：
原文地址：http://www.cnblogs.com/xumenger/p/4437721.html
