v1.6.1

funcext/TSOffice/TOfficeObj.tsf

@@ -1,4 +1,4 @@
-// Version 1.6.0
+// Version 1.6.1
 Function TOfficeObj(n);
 Begin
 	case lowercase(n) of

funcext/TSOffice/TSDocxFile.tsf

@@ -1,4 +1,4 @@
-// Version 1.6.0
+// Version 1.6.1
 Type TSDocxFile = Class
 	///Version: V1.0 2022-09-20
 	///适用于 Microsoft Word docx格式文件

funcext/TSOffice/TSXlsxFile.tsf

@@ -1,4 +1,4 @@
-// Version 1.6.0
+// Version 1.6.1
 Type TSXlsxFile = Class
 	///Version: V1.0 2022-08-08
 	///适用于 Microsoft Excel? 2007 及以上版本创建的电子表格文档。支持 XLSX / XLSM / XLTM / XLTX 等多种文档格式。

funcext/TSOffice/worksheet/xlsxStyles.tsf

@@ -155,12 +155,12 @@ Type xlsxStyles = Class
 		if numfmt_id >= 1 and numfmt_id <= 10 then return array('n', value);
 		if numfmt_id >= 11 and numfmt_id <= 26 then
 		begin
-			if ifstring(value) and (trystrtodate(value, r) or trystrtodatetime(value, r)) then return array('n', r);
+			if ifstring(value) and (trystrtodate(value, r) or trystrtodatetime(value, r) or trystrtotime(value, r)) then return array('n', r);
 			t := ifstring(value) ? 's' : 'n';
 			return array(t, value);
 		end
 		if numfmt_id >= 27 and numfmt_id <= 34 then return array('e', value);
-		if numfmt_id >= 35 and numfmt_id <= 48 then return array('n', trystrtofloat(value, r) ? r : value);
+		if numfmt_id >= 35 and numfmt_id <= 48 then return array('n', value);
 		if numfmt_id = 49 then return array('s', value);
 		if numfmt_id >= 50 and numfmt_id <= 55 then
 		begin
@@ -375,6 +375,7 @@ End;
 // numfmtid为32表示错误值格式，即显示为#NUM!。
 // numfmtid为33表示错误值格式，即显示为#N/A。
 // numfmtid为34表示错误值格式，即显示为#GETTING_DATA。
+// numfmtid是35表示货币格式，即显示为带有货币符号的数值，且小数位数为0。
 // numfmtid为36表示货币格式，即显示为带有货币符号和负数红色的数值。
 // numfmtid为38表示会计格式，即显示为带有货币符号和负数红色的数值，且小数位数为2。
 // numfmtid为39表示会计格式，即显示为带有货币符号和负数红色的数值，且小数位数为0。

更新日志.md

@@ -2,6 +2,14 @@
 
 ## 2023-2-5
 
+### V1.6.1
+
+#### excel
+
+1. 修复excel文件单元格原有类型与tsl类型转换报错问题(trystrtofloat)
+
+## 2023-2-5
+
 ### V1.6.0
 
 #### excel