delphi 指针操作

指针是存放指定类型（或未定义类型）变量内存地址的变量，因此指针间接引用一个值。定义指针不需用特定的关键字，而用一个特殊字符，这个特殊字符是脱字符号(^)，见下例：

type
  PointerToInt = ^Integer;

一旦你定义了指针变量，你就可以用@ 符号把另一个相同类型变量的地址赋给它。见下例：

var
  P: ^Integer;
  X: Integer;
begin
  P := @X;
  // change the value in two different ways
  X := 10;
  P^ := 20;  

如果定义了一个指针P，那么P表示指针所指向的内存地址，而P^表示内存所存储的实际内容。因此，在上面的代码中， P^ 与X相等。

除了表示已分配内存的地址外，指针还能通过New 例程在堆中动态分配内存，不过当你不需要这个指针时，你也必须调用Dispose 例程释放你动态分配的内存。

var
  P: ^Integer;
begin
  // initialization
  New (P);
  // operations
  P^ := 20;
  ShowMessage (IntToStr (P^));
  // termination
  Dispose (P);
end;

如果指针没有值，你可以把nil 赋给它。这样，你可以通过检查指针是否为nil 判断指针当前是否引用一个值。这经常会用到，因为访问一个空指针的值会引起一个访问冲突错误，也就是大家知道的“一般保护错”（GPF）。

Delphi 还定义了一个Pointer 数据类型，它表示无类型的指针（就象C语言中的void* ）。如果你使用无类型指针，你应该用GetMem 例程，而不是New例程，因为GetMem 例程能用于内存分配大小不确定的情况。

实际上，Delphi 中必须使用指针的情况很少，这是Delphi开发环境一个诱人的优点。虽然如此，若要进行高级编程和完全理解Delphi 对象模型，理解指针是很重要的，因为Delphi 对象模型在幕后使用了指针。

注意：虽然在Delphi中不常使用指针，但是你经常会用一个极为相似的结构--引用（references）。每个对象实例实际上是一个隐含的指针，或说是对其实际数据的引用，利用引用，你能象用其他数据类型一样使用对象变量。