使用Aero获取TProgressBar控件的颜色

Ari*_*vas 3 delphi colors aero windows-7 progress-bar

如何以编程方式获取启用Windows Aero功能的TProgressBar控件的条形颜色和背景颜色?

我正在使用第三方进度条控件,而不是Delphi附带的默认控件,我正在尝试使用正确的颜色绘制控件.

我使用的是Delphi 2010.

War*_* P 7

选项,按照对初学者最敏感的顺序,对初学者最不敏感:

(1)取出第三方进度条,并定期进行.(初学者,聪明的老家伙解决方案,具有讽刺意味的相同)

(2)获得剥皮/涂抹包,并按照您想要的方式绘制.(中间)

(3)学习使用Themes和UxThemes单元扩展自定义控件.(高级)

在你从#2和#3获得足够的痛苦之后,你将回到#1,而你身上的硬壳(明智的)旧计时器将做出与业余等级相同的决定.