pchar可以转换为string类型吗？how do? 问题简单，请不要见笑！

Question

pchar可以转换为string类型吗？how do? 问题简单，请不要见笑！

Answer 1

var s: string;
    P: pchar;
begin
...
 p := pchar(s);
 s := StrPas(p);

Answer 2

aiirii(ari)，对不起，我想让你帮我看一下，下面的代码有什么不对，
我运行的时候提示访问内存出错，就在转换时。
thank u!
procedure TForm1.Button1Click(Sender: TObject);
var i:pchar;
    s:cardinal ;
    str:string ;
begin
    s:=100;
    if getcomputername(i,s) then
        str := StrPas(i);
end;

Answer 3

搂主，程序改为：
procedure TForm1.Button1Click(Sender: TObject);
var i:pchar;
    s:Dword ;
    str:string ;
begin
    s:=100;
    getmem(i,101);
    if getcomputername(i,s) then
        str := StrPas(i);
end;
你试一下：）