將每個邊緣框線色彩設定為 12 個 Office 佈景主題色彩插槽之一,並帶有選用色調。
Border.Color 的佈景主題配套方法。適用於所有邊緣選取器(上、下、左、右、對角線,以及複合選取器 xlAround、xlInsideVertical、xlInsideHorizontal、xlInsideAll)。自 v2.61.0 起可用;複合選取器路徑於 v2.63.0(wave D 第 6 階段)完成
語法
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 / Font 設定器相同的雙線路輸出:
- XF 記錄會在對應的邊緣欄位上取得最佳匹配的索引 icv,以符合 Excel 97-2003 相容性
- XFExt $087D 記錄會在對應的框線 extType($0007 上、$0008 下、$0009 左、$000A 右、$000B 對角線)上取得 FullColorExt 欄位,並帶有
xclrType=3 與 xclrValue=ThemeIdx
複合選取器透過內部插槽集輔助程式,在單次儲存格迴圈傳遞中為每個實體邊緣登錄一個 XFExt 插槽。
xlAround 登錄
{rsTop, rsBottom, rsLeft, rsRight};
xlInsideVertical 登錄
{rsLeft, rsRight};
xlInsideHorizontal 登錄
{rsTop, rsBottom};
xlInsideAll 登錄全部四個。透過
Border.Color 讀取時傳回已解析的 RGB
BIFF8 FullColorExt 只能攜帶單一對角線色彩,因此 xlDiagonalDown 和 xlDiagonalUp 共用相同的 XFExt 插槽 (rsDiag)
範例
使用 accent4(佈景主題色彩)勾勒報表帶的外框,並新增帶有 25% 較淺色調的 accent5 分隔線
var
Report: IXLSRange;
begin
Report := Workbook.Sheets[1].Range['A1', 'F20'];
Report.Borders[xlAround].SetThemeColor(7, 0.0);
Report.Borders[xlInsideHorizontal].SetThemeColor(8, 0.25);
Workbook.SaveAs('ThemedBorders.xls', xlExcel97);
end;
另請參閱