好多程序都给结构体变量设定了一个结构体指针 例如:
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;呢?仅仅是为内存的分配与释放么? 回答: 这个问题实际上与Delphi 的语法结构有着密切的关系。因为Delphi 所使用的语言是Pascal 所以在Pascal 中结构体与C++的结构体有着很多相似的地方. 因为结构体经常被看做是一种变量类型.作为一种类的变体,结构体在声明实例的时候就被构建了. 也正是这个原因所以 Delphi 的结构体并没有 Create(构建) 与 Destory(析构) 函数. 顺便说一下,在变量区 声明的Delphi 的类变量 实际上是一个指针. 在你声明:(var 类实例名称: 类名) 时“类实例名称”并没有被创建, 而要等到你使用 (类实例名称 := 类名.Create(参数1,参数2...)) 这样的情况下 这个类变量才会指向一个 存在的类实例. 这个类变量可以使用.
而PAbc = ^TAbc; 则正好声明了PAbc 是 TAbc 这种结构体(变量类型)的指针、这样就可以避免 了在声明变量的时候 结构体就已被构建的问题. 而new 和 Dispose 这两个函数就是为机构体动态地分配和释放内存的函数.
这个问题,可能比较抽象,但是要是你理解指针的话你可以将结构体想象成整数,而结构体的指针考虑成这个整数 的指针.这样的话可能理解起来会比较容易.
你之所以问这个问题是因为你不知道什么时候要用指针。Abc: TAbc;很多时候当然可以代替 Abc: PAbc;,但有些时候就必需要用指针, 不然可能会有问题,比如你用一个TList放你的数据,这时候按你那样说可以用这个Abc: TAbc,然后这样List.add(@Abc), 但因为这时候Abc内存的分配与释放是Delphi自己完成的,弄不好它就帮你把内存提前释放了,这样就会有问题,所以你要用Abc: PAbc这个, 自己分配(new)和释放(dispose)内存.当然这只是个例子,还有很多地方不得不用指针的,比如要实现链表等。