delphi - 组件属性在设计时有效，但在运行时无效

Question

我正在创建一个使用面板集合和集合项的组件。

我似乎无法让颜色在运行时工作，但它们似乎在设计时工作得很好。

您可以在此处下载组件源代码：

有一个控制台 (Tcollection) 属性、状态颜色属性和一个编辑模式属性

每个控制台 (TCollectionItem) 在更改时都有一个状态属性，控制台属性根据组件的 StatusColors 属性进行更改。

当组件的 EditMode 属性设置为 true 时，您可以在运行时移动面板。

问题：为什么颜色只在设计时有效而不在运行时有效。

谢谢

score 1 · Accepted Answer

我还没有查看您的代码，但“面板”+“颜色不起作用”听起来好像您忘记将ParentBackground设置为 False。

我猜这些颜色可能在设计时起作用，因为您通过使用 XPMan 而不是通过选中项目选项中的“启用运行时主题”复选框来启用主题。（第二个选项仅适用于您，如果您有 D2007 或更高版本。）

1 回答 1