HotXLS 文件

SetThemeColor 方法 (Border)

將每個邊緣框線色彩設定為 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 設定器相同的雙線路輸出:
複合選取器透過內部插槽集輔助程式,在單次儲存格迴圈傳遞中為每個實體邊緣登錄一個 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;

另請參閱