Question

Delphi中的结构体与结构体指针

我看到好多程序都给结构体变量设定了一个结构体指针
例如：
PAbc = ^TAbc;
TAbc = record
a: string[10];
b: string[5];
c: string[1];
end;

var
Abc: PAbc;

New(Abc);
...
Dispose(Abc);
...

我不清楚这是为什么
定义结构体变量的时候可以直接
var
Abc: TAbc;
这样做啊，为什么要PAbc = ^TAbc;呢？仅仅是为内存的分配与释放么？
向各位求教~

Answer 1

这个问题实际上与Delphi 的语法结构有着密切的关系。因为Delphi 所使用的语言是Pascal 所以在Pascal 中结构体与C++的结构体有着很多相似的地方.因为结构体经常被看做是一种变量类型.作为一种类的变体，结构体在声明实例的时候就被构建了.也正是这个原因所以 Delphi 的结构体并没有 Create(构建) 与 Destory(析构) 函数. 顺便说一下,在变量区 声明的Delphi 的类变量 实际上是一个指针.在你声明:(var 类实例名称: 类名) 时“类实例名称”并没有被创建, 而要等到你使用
(类实例名称 := 类名.Create(参数1,参数2...)) 这样的情况下 这个类变量才会指向一个 存在的类实例. 这个类变量可以使用.

而PAbc = ^TAbc; 则正好声明了PAbc 是 TAbc 这种结构体(变量类型)的指针、这样就可以避免 了在声明变量的时候 结构体就已被构建的问题.而new 和 Dispose 这两个函数就是为机构体动态地分配和释放内存的函数.

这个问题,可能比较抽象,但是要是你理解指针的话 你可以 将结构体想象成 整数而 结构体的指针 考虑成 这个整数 的指针.这样的话可能理解起来会比较容易.

Answer 2

你之所以问这个问题是因为你不知道什么时候要用指针。Abc: TAbc;很多时候当然可以代替 Abc: PAbc;,但有些时候就必需要用指针,不然可能会有问题,比如你用一个TList放你的数据,这时候按你那样说可以用这个Abc: TAbc,然后这样List.add(@Abc),但因为这时候Abc内存的分配与释放是Delphi自己完成的,弄不好它就帮你把内存提前释放了,这样就会有问题,所以你要用Abc: PAbc这个,自己分配(new)和释放(dispose)内存.当然这只是个例子,还有很多地方不得不用指针的,比如要实现链表等