将字体颜色设置为 12 个 Office 主题颜色槽之一,并带可选色调调整。
Font.Color 的主题配套方法 — 当应用程序希望跟随工作簿主题调色板而非固定字面 RGB 时使用。自 v2.61.0(图表待办 wave D phase 4)起可用
语法
procedure SetThemeColor(ThemeIdx: Word; Tint: Double);
参数
ThemeIdx — 从 0 开始的主题槽
(0=lt1, 1=dk1, 2=lt2, 3=dk2, 4..9=accent1..6, 10=hlink, 11=foHlink)
Tint — 规范风格的变浅/变深调整,范围为 -1.0 .. +1.0
以 Q15 有符号整数编码到 XFExt FullColorExt 的 nTintShade 中
备注
该设置器的行为与
Interior.SetThemeColor 相同,但写入 XFExt $087D extType($000D)的 rsFont 槽。Font XF 条目仍会获得最佳匹配的索引 icv,以便 Excel 97-2003 看到近似值;Excel 2007+ 会从 XFExt FullColorExt 槽恢复精确的主题 idx + tint
通过
Font.Color 回读返回通过工作簿 BIFF 主题调色板解析后的 RGB,因此无论原始设置器基于 RGB 还是主题,应用程序始终看到具体的 LongWord
示例
用 accent3 + 色调标记审计列,使字体颜色跟随工作簿主题
Workbook.Sheets[1].Range['D2', 'D50'].Font.SetThemeColor(6, - 0.25);
Workbook.SaveAs('AuditColumn.xls', xlExcel97);
参见