Question

关于delphi指针，记得在C语言中可以用*取指针的值（就是指针存放的地址的值），，那么在delphi中怎么实现

type
pnext=^Tperson;
Tperson=record
name:string;
age:Word;
next:pnext;
end;
var
person:Tperson;
str:string;
begin
str:='%s今年%d岁';
person.name:='李四';
person.age:=18;
ShowMessage(Format(str,[person.name,person.age]));
Memo1.Lines.Add(Format(str,[person.name,person.age]));
person.next:=@person;
Edit1.Text:=person.next;
end;

Answer 1

C: 取地址 &v 地址中的配锋液扰值 *p
DELPHI: 取地址 @v 地址培埋晌中的值 p^

Answer 2

type
pnext=^Tperson;
Tperson=record
name:string;
age:Word;
next:pnext;
end;
var
person:Tperson;
str:string;
begin
str:='%s今年基裤%d岁明锋胡';
person.name:='李激拦四';
person.age:=18;
ShowMessage(Format(str,[person.name,person.age]));
Memo1.Lines.Add(Format(str,[person.name,person.age]));
person.next:=@person;
Edit1.Text:=person.next^.name;
end;