指针与指针类型

{^放在类型前面 表示指向该类型的变量的指针；
^放在指针后面，表示对指针解除引用，
即返回指针所指向地址处保存的值
@用于取得变量，函数的地址；
}
procedure TForm1.Button1Click(Sender: TObject);
var
  a, b: Integer;   //整数变量
  p: ^Integer;     //指向integer类型的指针变量
begin
  a := 10;
  p := @a;         //@将X的地址赋给P
  b := p^;         //将P所指位置的值赋给b
  ShowMessage(IntToStr(b));   //b的结果为10
end;