This commit is contained in:
csh 2023-08-22 14:33:57 +08:00
parent 9037124c01
commit 819efc1ee1
5 changed files with 30 additions and 3 deletions

Binary file not shown.

View File

@ -1,4 +1,4 @@
// Version 1.4.2
// Version 1.4.3
Function TOfficeObj(n);
Begin
@ -11078,6 +11078,25 @@ Type TParagraph = Class(DocObject, TParagraphImpl)
markEnd.SetAttribute('w:id', bookMarkID);
return name;
End;
///判断是否为空段落
///返回: bool
Function Empty();
Begin
if ifObj(node_) then
begin
sub_node := node_.FirstChildElement();
if not ifObj(sub_node) then return true;
// 兼容wps
sub_node2 := sub_node.NextElement();
if sub_node.GetName() = 'w:bookmarkStart' and ifObj(sub_node2) and sub_node2.GetName() = 'w:bookmarkEnd' then
return true;
// 兼容word
if sub_node.GetName() = 'w:pPr' and not ifObj(sub_node2) then
return true;
end
return false;
End;
Function CopyRunFormat(del, toRunNode);
Begin

View File

@ -1,4 +1,4 @@
// Version 1.4.2
// Version 1.4.3
Type TSDocxFile = Class
///Version: V1.0 2022-09-20

View File

@ -1,4 +1,4 @@
// Version 1.4.2
// Version 1.4.3
Type TSExcelFile = Class
///Version: V1.0 2022-08-08

View File

@ -1,5 +1,13 @@
# 更新日志
## 2023-8-22
### V1.4.3
#### word
支持段落判空`TParagraph.Empty()`
## 2023-8-18
### V1.4.2