如何解决如何在 Delphi 中允许标签字体文本颜色? 自定义样式问题
我正在尝试设置标签字体颜色,如下所示:
- TLabel1.Font.Color := clGreen;
- TLabel2.Font.Color := clBlue;
- TLabel3.Font.Color := clRed;
但是当我选择自定义样式时:
然后运行程序,这是我得到的:
标签字体颜色变回白色(这只会在我使用自定义样式之一时发生),但我确实需要在我的程序中打开自定义样式,并且我还希望标签的字体颜色保持彩色而不是白色。
有什么办法可以解决这个问题吗?
解决方法
Vcl 样式决定了标签文本的属性(例如颜色)。然而,这可以被
否决-
从标签
seFont
中删除StyleElements
-
根据需要更改
Font
属性
在代码中,您可以例如写
Label4.StyleElements := Label4.StyleElements - [seFont];
Label4.Font.Color := clRed;
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。