From 5469ca318dd9f03e998bfc1738d8b18d6fefd453 Mon Sep 17 00:00:00 2001 From: csh Date: Mon, 6 May 2024 15:12:37 +0800 Subject: [PATCH] v1.6.9 --- funcext/TSOffice/TOfficeObj.tsf | 2 +- funcext/TSOffice/TSDocxFile.tsf | 2 +- funcext/TSOffice/TSXlsxFile.tsf | 4 ++-- 更新日志.md | 6 ++++++ 4 files changed, 10 insertions(+), 4 deletions(-) diff --git a/funcext/TSOffice/TOfficeObj.tsf b/funcext/TSOffice/TOfficeObj.tsf index 3753e76..808780e 100644 --- a/funcext/TSOffice/TOfficeObj.tsf +++ b/funcext/TSOffice/TOfficeObj.tsf @@ -1,4 +1,4 @@ -// Version 1.6.8 +// Version 1.6.9 Function TOfficeObj(n); Begin case lowercase(n) of diff --git a/funcext/TSOffice/TSDocxFile.tsf b/funcext/TSOffice/TSDocxFile.tsf index 3029f49..74dfd9d 100644 --- a/funcext/TSOffice/TSDocxFile.tsf +++ b/funcext/TSOffice/TSDocxFile.tsf @@ -1,4 +1,4 @@ -// Version 1.6.8 +// Version 1.6.9 Type TSDocxFile = Class ///Version: V1.0 2022-09-20 ///适用于 Microsoft Word docx格式文件 diff --git a/funcext/TSOffice/TSXlsxFile.tsf b/funcext/TSOffice/TSXlsxFile.tsf index 0411a24..03b70c5 100644 --- a/funcext/TSOffice/TSXlsxFile.tsf +++ b/funcext/TSOffice/TSXlsxFile.tsf @@ -1,4 +1,4 @@ -// Version 1.6.8 +// Version 1.6.9 Type TSXlsxFile = Class ///Version: V1.0 2022-08-08 ///适用于 Microsoft Excel? 2007 及以上版本创建的电子表格文档。支持 XLSX / XLSM / XLTM / XLTX 等多种文档格式。 @@ -222,7 +222,7 @@ Type TSXlsxFile = Class value := class(TSXml).CurCodePageToUtf8(val); // 处理cell设定的样式 if not ifarray(opt) then opt := array(); - workbook_.SetCellStyleOpt(sheet, axis, opt); + workbook_.SetCellStyleOpt(sheet_name, axis, opt); SetCellType(sheet, axis, value, opt); return workbook_.SetCellValue(sheet_name, axis, value, opt); End; diff --git a/更新日志.md b/更新日志.md index 8fea07c..4126db2 100644 --- a/更新日志.md +++ b/更新日志.md @@ -1,5 +1,11 @@ # 更新日志 +## 2023-5-6 + +### excel + +1. 修复单元格继承列样式失败问题 + ## 2023-4-12 ### V1.6.8