Stelt de lettertypekleur in op één van de 12 Office-themakleursloten met een optionele tintaanpassing. Themacompanion van
Font.Color — gebruik het wanneer de toepassing het themapalet van de werkmap wil volgen in plaats van een letterlijke RGB-waarde vast te leggen. Beschikbaar sinds v2.61.0 (chart backlog wave D fase 4)
Syntaxis
procedure SetThemeColor(ThemeIdx: Word; Tint: Double);
Parameters
ThemeIdx — 0-based theme slot
(0=lt1, 1=dk1, 2=lt2, 3=dk2, 4..9=accent1..6, 10=hlink, 11=foHlink)
Tint — aanpassing lichter/donkerder in spec-stijl, in het bereik -1.0 .. +1.0
Encoded into the XFExt FullColorExt as a Q15 signed integer in nTintShade
Opmerkingen
The setter behaves identically to
Interior.SetThemeColor, maar schrijft het rsFont-slot van de XFExt $087D extType ($000D). De Font-XF-invoer krijgt nog steeds een best-match geïndexeerde icv, zodat Excel 97-2003 een benadering ziet; Excel 2007+ herstelt de exacte thema idx + tint uit het XFExt FullColorExt-slot
Teruglezen via
Font.Color retourneert de RGB-waarde zoals opgelost via het BIFF-themapalet van de werkmap, zodat de toepassing altijd een concrete LongWord ziet, ongeacht of de oorspronkelijke setter op RGB of op een thema was gebaseerd
Voorbeeld
Tagt een auditkolom met accent3 + tint zodat de lettertypekleur het werkmapthema volgt
Workbook.Sheets[1].Range['D2', 'D50'].Font.SetThemeColor(6, - 0.25);
Workbook.SaveAs('AuditColumn.xls', xlExcel97);
Zie ook