v1.4.3-patch2

2023-08-25 16:37:07 +08:00 · 2023-08-25 16:37:07 +08:00 · 81b806c93c
parent 60847b0636
commit 81b806c93c
1 changed files with 3 additions and 1 deletions
--- a/funcext/TSOffice/document/TDocxCopy.tsf
+++ b/funcext/TSOffice/document/TDocxCopy.tsf
@ -242,7 +242,9 @@ private
 		begin
 			for c:=1 to col do
 			begin
-				node := table.Cell(r, c).node_;
+				cell := table.Cell(r, c);
+				if not cell then continue;	
+				node := cell.node_;
 				if (tbl := node.FirstChildElement('w:tbl')) then
 				begin
 					obj := TOfficeObj('TTable');