TabControl 显示彩色的图示 (XE6 Firemonkey)

提示：Delphi 10 Seattle 透过 TImageList 来指定图标，就能显示原来图标的颜色。

 

 

下列方法只适用于 XE6

XE6 Firemonkey 里的 TabControl 可以将切页按钮设置一个图示，但显示的图示皆为灰色，如下图所示：

 

如果想要显示彩色的图示，则需要修改 Style 才能达到，以下以用「AndroidDiamond.style」示范：

1. 先放一个 StyleBook1 在 Form 里。
2. 将 Form.StyleBook 指定为 StyleBook1。
3. 在 StyleBook1 上点二下，并按上方「Load...」将「AndroidDiamond.style」载入。
4. 在左上 Structure 里找到「tabitemcustom」展开到「icon」。
5. 在左下 Object Inspector 找到「SourceLookup」并将它清空。
6. 按上方「Apply and Close」。

 

接著就能看到彩色的图示：