指针类型

指针是表示内存地址的一个变量类型。例如，当一个指针变量PP含有P变量时，指针PP就指向了变量P在内存中的地址，或者可以

说成指针PP指向了变量P中所保存的数据。如果指针PP是一个结构类型的变量，则指针PP就会指向变量P的第一个元素。

声明指针类型：

Type
    指针名称 =^ 基类型；//根据预定义类型声明一个指针
var
    指针变量名称： 指针名称；//定义一个指针变量

指针类型的使用：

procedure TForm1.Button6Click(Sender: TObject);
Type
  pp = ^Integer;  //指针类型
var
  p1 : pp; //在type处声明为指针类型。
  x : integer;
begin
  x := 101;
  p1 := @x; //@ 运算符在变量名层的前面，表示获取当前变量的所在的内存地址。
  edit8.Text := inttostr(p1^);//^ 在指针后面，获取指针所指向的数据。
end;

最后输出数值为101。

procedure TForm1.Button1Click(Sender: TObject);
var
  A: Integer;
  B: string;
  PA: PInteger;//声明为指针类型
  PB: PString;
begin
  A := 1;
  B := 'Hello';
  PA := @A;
  PB := @B;
  ShowMessage(IntToStr(PA^)); //结果为1
  ShowMessage(PB^);//结果为Hello
end;

以上两种指针类型的声明均可，可以看出第一种是在type下使用预定义类型来声明并使用 ^符号，第二种则是在var下使用PInteger直接定义声明。