我正在使用 Delphi 10.2 中的 VCL 样式。
我MyButtonStyle
在自定义按钮组件上有一个属性 - TMyButton
,它继承自TButton
.
type
MyButtonStyle = ('Default', 'Red', 'Yellow', 'Green');
基于MyButtonStyle
属性值:
应用 VCL 样式时,我想将颜色更改TMyButton
为:默认(默认选择的样式颜色)、红色、黄色或绿色。
知道如何实现吗?
我尝试在 Delphi 中使用位图样式设计器。但它只允许在设计时选择颜色。如何在运行时实现这一点?