公共区域声明pId:^integeriID:integer
赋值pId := @iID;iID := pId;
pId := listview.datapId := adoquery.fielbyname('ID').asinteger;
这样写对吗,最后一行报错,第二行不抱错赋值错误…
varii:integer;pid:^integer;beginii:= pid^;end;
pId^ := adoquery.fielbyname('ID').asinteger;试试