delphi - Delphi 2009 - 对象检查器中的自定义枚举类型属性

Question

我创建了一个自定义 TAction 类型，它有 2 个附加属性，它们是字符串类型和枚举。

字符串值在对象检查器中正常显示，但是枚举类型根本没有出现。如何获取自定义枚举类型以在对象检查器中显示为下拉属性值？

score 11 · Accepted Answer

枚举属性应该使用默认的 TEnumProperty 类来编辑属性。

似乎找不到 RTTI 信息。枚举类型在哪里定义？在与组件相同的文件中？

您是否使用具有自定义值的枚举类型，例如：

TMyEnum = (aA = 1, aB = 3);

说明：如果您定义一个带有值的枚举，您将创建一个带有预定义常量的子范围类型。所以上面要解释为：

type
  TMyEnum = 1..3;
const
  aA : TMyEnum = 1;
  aB : TMyEnum = 3;

这可能会导致奇怪的情况，例如：Succ(aA) 不是 aB，而是 2。信息在帮助（语言指南）简单类型 [具有显式分配序数的枚举类型] 中。

这可能是问题的根源。

如果一切都失败了，您可以创建自己的属性编辑器。它能够更改对象检查器中的枚举属性。通常你可以使用默认的 TEnumProperty。但如果这还不够，你可以自己动手：

第 1 步，派生一个属性编辑器。在您的情况下，可能 TEnumProperty （单位 DesignEditors）可能只需很少的更改就足够了。

第 2 步，确保 GetValue 和 SetValue 方法工作正常。他们需要将字符串转换为枚举属性并返回。

第 3 步，如果您想要真正的特殊编辑，请确保覆盖编辑方法。

第 4 步，确保编辑器属性有效。

第 5 步，使用 RegisterPropertyEditor 注册属性编辑器。

只需查看组件编写器指南以获取更多信息。

1 回答 1