我什么时候应该在 Delphi 中使用增强的记录类型而不是类？

Question

Delphi 2006 引入了新的记录功能，使它们更加“面向对象”。

在哪些情况下记录类型比类类型更适合设计？ 使用这些记录类型有什么好处？

Answer 1

我认为这些功能在 Delphi 8 和 2005 中也可用。

主要指南：如果您有疑问，请使用类。

对于其余的，您必须了解主要区别：类对象始终通过引用使用，并通过调用构造函数创建。

记录的内存管理和分配与基本类型（即整数、双精度）相同。 这意味着它们按值传递给方法（除非使用 var）。 此外，您不需要释放记录，这就是它们支持运算符重载的原因。 但没有继承或虚拟方法等。新记录可以有一个构造函数，但它的使用是可选的。

使用记录的主要领域和标准：

• 当处理来自 Win32 API 的结构时

• 当类型没有标识时（因为赋值意味着复制）< /p>

• 当实例不太大时（复制大记录变得昂贵）

• 当构建值类型时，其行为应该模仿数字类型。 例如日期时间、复数、向量等。运算符重载是一个很好的功能，但不要将其作为决定因素。

从效率角度来看，不要过度这样做：

• 对于经常放入数组中的较小类型。

最后，使用类或记录的规则与早期版本的 Delphi 相比并没有真正改变。

Answer 2

除了其他答案（运算符重载、轻量级值类型）之外，最好让枚举器记录而不是类。 由于它们是在堆栈上分配的，因此无需构造和析构它们，这也消除了编译器在类类型枚举器周围放置的隐藏 try..finally 块的需要。

请参阅http://hallvards.blogspot.com/2007/10 /more-fun-with-enumerators.html 了解更多信息。

Answer 3

您可以使用运算符重载（如隐式转换）。 您也可以在 Delphi 2007+ 或 2006.NET 上的对象上执行此操作，但只能在 2006 win32 上的这些记录上执行。

Answer 4

您有记录、对象和类。

记录从turbo pascal 1开始可用。它们是轻量级的，能够具有属性和方法，但它们不支持继承，返回记录的函数存在一些问题。 如果这些记录有方法，有时会出现内部错误：

type
  TRec = record 
    function Method1: Integer;
  end;

function Func: TRec;


procedure Test;
var
  x : TRec;

begin
  Func.Method1; // Sometimes crashes the compiler
  // Circumvention:
  x := Func;
  x.Method1; // Works
end;

如果我是正确的，则使用 Turbo pascal 5 引入对象。 然后他们提供了一种使用 pascal 进行面向对象的方法。 随着 Delphi 的引入，它们或多或少地被弃用了，但您仍然可以使用它们。 对象可以实现接口。

类是用 Delphi 1 引入的，也是最通用的。 它们实现接口并支持继承。 但每个类变量都是一个隐藏指针。 这意味着需要在堆上创建类。 幸运的是，这个过程大部分是隐藏的。

下表列出了三者之间的差异。 我添加了完成的接口。

                  |Class|Object|Record|Interface|
------------------|-----------------------------|
Are pointers?     |  y  |  n   |  n   |    y    |
Inheritance       |  y  |  y   |  n   |    y    |
Helpers           |  y  |  n   |  y   |    n    |
Impl. Interface   |  y  |  y   |  n   |    -    |
Visibility        |  y  |  y   |  n   |    n    |
Method            |  y  |  y   |  y   |    y    |
Fields            |  y  |  y   |  y   |    n    | 
Properties        |  y  |  y   |  y   |    y    |
Consts            |  y  |  y   |  y   |    n    |
Types             |  y  |  y   |  y   |    n    |
Variants          |  n  |  n   |  y   |    n    |
Virtual           |  y  |  n   |  y   |    -    |
------------------|-----------------------------|