diff --git a/funcext/TSOffice/TOfficeObj.tsf b/funcext/TSOffice/TOfficeObj.tsf index 7d63f6f..3b8d3d8 100644 --- a/funcext/TSOffice/TOfficeObj.tsf +++ b/funcext/TSOffice/TOfficeObj.tsf @@ -1,4 +1,4 @@ -// Version 1.3.5 +// Version 1.3.6 Function TOfficeObj(n); Begin @@ -14444,6 +14444,23 @@ Type TTable = Class(DocObject, TTableImpl) End; TblGrid.GridCol := gridArr; End; + + Function RowHeight(row, height); + Begin + if row <= 0 or row > Rows() then return; + node := node_.FirstChildElement('w:tr'); + cnt := row - 1; + while(cnt) do + begin + node := node.NextElement('w:tr'); + cnt--; + end + trnode := node.FirstChildElement("w:trPr"); + if not ifObj(trnode) then trnode := node.InsertFirstChild('element', 'w:trPr'); + node := trnode.FirstChildElement('w:trHeight'); + if not ifObj(node) then node := trnode.InsertFirstChild('element', 'w:trHeight'); + node.SetAttribute('w:val', height); + End; Property Format read readFormat; Function readFormat(); diff --git a/funcext/TSOffice/TSDocxFile.tsf b/funcext/TSOffice/TSDocxFile.tsf index 8173458..6a6c938 100644 --- a/funcext/TSOffice/TSDocxFile.tsf +++ b/funcext/TSOffice/TSDocxFile.tsf @@ -1,4 +1,4 @@ -// Version 1.3.5 +// Version 1.3.6 Type TSDocxFile = Class ///Version: V1.0 2022-09-20 @@ -206,7 +206,7 @@ Type TSDocxFile = Class End; ///word文档指定表格 - ///n: int 第n个表格 + ///n: int 从0开始,第n个表格 ///返回:TTable对象 Function GetTable(n); Begin diff --git a/funcext/TSOffice/TSExcelFile.tsf b/funcext/TSOffice/TSExcelFile.tsf index e3cee24..c58d990 100644 --- a/funcext/TSOffice/TSExcelFile.tsf +++ b/funcext/TSOffice/TSExcelFile.tsf @@ -1,4 +1,4 @@ -// Version 1.3.5 +// Version 1.3.6 Type TSExcelFile = Class ///Version: V1.0 2022-08-08 diff --git a/更新日志.md b/更新日志.md index 8af6991..a400f23 100644 --- a/更新日志.md +++ b/更新日志.md @@ -1,5 +1,13 @@ # 更新日志 +## 2023-7-19 + +### V1.3.6 + +#### word + +新增对表格的行高设置`table.RowHeight(row, height)` + ## 2023-7-14 ### V1.3.5