Question

delphi中pchar和^char的区别

在delphi中 一直以为pchar 和 ^char没有太大区别 但使用总是糊涂的，进行测试，不管方法对不对，但发现测试结果他们是有区别的，能通过例子详细解释么?var c :string; d :pchar; e :^char; f :pchar; g :Pchar; h :^char; i:integer; begin setlength(c,10); for i:= 1 to 2 do begin c[i] := 'a'; end; f := @c[1]; //仓库内容 g := @c; //门牌号 e := @c[1]; //仓库 d := @c[1]; //仓库内容 h := @c; showmessage(f); //aa showmessage(g); //乱码 showmessage(e^); //a showmessage(d); //aa showmessage(d^); //a // showmessage(h); //错误 // showmessage(e); //错误 showmessage(c); //aa end;procedure TForm1.Button3Click(Sender: TObject);varP: PChar;S1, S2: string;beginS1 := '1234567ABCDE'; S2 := S1;P := PChar(S1); ShowMessage(IntToStr(SizeOf(S1))); //获得 S1 变量的大小 ShowMessage(IntToStr(integer(S1))); //获得 S1 指向的字符串的指针地址ShowMessage(IntToStr(integer(P))); //获得 P 指向的字符串的指针地址ShowMessage(IntToStr(integer(S2))); //获得 S2 指向的字符串的指针地址S1 := P; ShowMessage(IntToStr(integer(S1)));ShowMessage(IntToStr(integer(P)));ShowMessage(IntToStr(integer(S2)));end;

Answer 1

pchar:类型是一个指向空字符结束的字符串
^char:是一个字符指针。是个指针，里面的内容是字符。
var
c
:string;
d
:pchar;
e
:^char;
f
:pchar;
g,g1:Pchar;
h
:^char;
i:integer;
begin
setlength(c,10);
for
i:=
1
to
2
do
begin
c[i]
:=
'a';
end;
f
:=
@c[1];
//仓库内容
g
:=
@c;
//门牌号
g1
:=pchar(c);
//仓库内容，同d一样
e
:=
@c[1];
//仓库
d
:=
@c[1];
//仓库内容
h
:=
@c;
showmessage(f);
//aa
showmessage(g);
//把g赋值的是指针地址，显示当然是乱码了,可以改为一下句，显示内容
showmessage(g1);
showmessage(e^);
//a
showmessage(d);
//aa
showmessage(d^);
//a
//
showmessage(h);
//错误
h,e是指针
不能按字符显示showmessage(IntToStr(integer(h)));
//
showmessage(e);
//错误
showmessage(c);
//aa
end;