如何让 Object Inspector 显示更多 TColor 属性值？答案

【问题标题】：How do I make the Object Inspector show more TColor property values?如何让 Object Inspector 显示更多 TColor 属性值？
【发布时间】：2011-06-03 17:38:09
【问题描述】：

IDE 对象检查器使用下拉颜色框显示 TColor 属性，并且可以按名称选择颜色 - clBlack 等，如图形单元中定义的那样。问题是图形单元中定义的 clWeb 颜色不存在，我定义的任何自定义颜色也不存在。

那么如何扩展在对象检查器中可选择的已定义颜色？

PS 德尔福 XE

【问题讨论】：

除了你写的那个之外，other 控件的Color 属性是否显示颜色？这是关于您的自定义组件的问题，还是关于如何添加新颜色的问题？
相同的颜色列表出现在，比如说，一个 TColorBox 放到一个 VCL 表单上。自定义颜色出现在编辑器的代码完成窗口中，但不出现在对象检查器中。
我明白了。由于您的问题与您的自定义组件无关，因此我已删除了您问题的那一部分。此外，代码完成窗口会向您显示clWeb 颜色，因为它实际上向您显示所有整数常量——您在查看列表之前已经输入了cl。 TColor 只是一个整数；这些常数本身并没有什么特别之处。它是内置的 TColor 属性编辑器，它知道显示这些特定值。
当我有机会进一步调查时，我会回到这个问题。我的开发机器（一台笔记本电脑）突然死机了，我还在设置一台新机器..

标签： delphi components delphi-xe propertyeditor

【解决方案1】：

我会尝试从 TColorProperty（单元 VCLEditors）派生一个类并覆盖 GetValue/GetValues/SetValue。有关详细讨论，请参阅here。

编辑：我的原始链接现在已损坏。请改用线程 Custom colors in Delphi 7（在 borland.public.delphi.vcl.components.writing.general 中）。

【讨论】：

啊，这看起来很有希望。谢谢。
@UlrichGerhardt - 该链接现已损坏。转到显示“未找到指定消息 [93199]”的 Embarcadero 页面。