怎么取一个变量的地址给一个指针变量？ 例如： i:integer=4; p:^integer; 怎么取i的地址给P^，我想通过p^改变i的值。

p := @i;    --- 歡迎光臨 KTop 研究院--<-<-<@

怎么取i的地址给P^，我想通过p^改变i的值。 var i: Integer; P: ^Integer; // P 指向一个整数 begin i := 4; // 给X 赋值 P := @i; // 把X 的地址赋给P P^:=2003; showmessage(inttostr(i)); //为2003 end;