type
b=^a;
a=record
  a1:string;
  a2:integer;
  a3:boolean;
end;
var
c:b;
d:tlist;
e:string;
begin
d:=TList.Create;
new(c);
c^.a3:=true;
c^.a2:=2;
c^.a1:='aa';d.Add(c);e:=b(d.Items[0])^.a1;
self.Caption:=e;
end;此段程序可以运行成功,但本人要问的是为什么e:=b(d.Items[0])^.a1中打.时后面的a1,a2,a3无法出现,如有错,请指出