Imposta il colore del font su uno dei 12 slot di colore del tema Office con una regolazione facoltativa della tinta. Controparte a tema di
Font.Color — usarlo quando l'applicazione vuole seguire la palette dei temi della cartella di lavoro invece di fissare un RGB letterale. Disponibile dalla v2.61.0 (chart backlog wave D phase 4)
Sintassi
procedure SetThemeColor(ThemeIdx: Word; Tint: Double);
Parametri
ThemeIdx — 0-based theme slot
(0=lt1, 1=dk1, 2=lt2, 3=dk2, 4..9=accent1..6, 10=hlink, 11=foHlink)
Tint — spec-style lighter/darker adjustment in the range -1.0 .. +1.0
Encoded into the XFExt FullColorExt as a Q15 signed integer in nTintShade
Osservazioni
The setter behaves identically to
Interior.SetThemeColor, ma scrive lo slot rsFont del XFExt $087D extType ($000D). La voce Font del XF riceve comunque un icv indicizzato con la corrispondenza più vicina, così Excel 97-2003 vede un'approssimazione; Excel 2007+ recupera l'idx del tema e la tinta esatti dallo slot FullColorExt del XFExt
Reading back via
Font.Color returns the RGB resolved through the workbook's BIFF theme palette, so the application always sees a concrete LongWord regardless of whether the original setter was RGB o theme based
Esempio
Contrassegna una colonna di audit con accent3 + tinta, così il colore del font segue il tema della cartella di lavoro
Workbook.Sheets[1].Range['D2', 'D50'].Font.SetThemeColor(6, - 0.25);
Workbook.SaveAs('AuditColumn.xls', xlExcel97);
Vedere also