From 3b16e6969fccb829bf6ab8be03fba9bd12f3be1a Mon Sep 17 00:00:00 2001
From: csh <caoshenghui@tinysoft.com.cn>
Date: Mon, 25 Nov 2024 09:55:15 +0800
Subject: [PATCH] =?UTF-8?q?=E9=A1=B5=E7=A0=81=E8=B5=B7=E5=A7=8B=E9=A1=B5?=
 =?UTF-8?q?=E4=B8=BA1?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 TSDocxToPdf.tsf | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/TSDocxToPdf.tsf b/TSDocxToPdf.tsf
index bad9705..5e6e56c 100644
--- a/TSDocxToPdf.tsf
+++ b/TSDocxToPdf.tsf
@@ -269,7 +269,8 @@ begin
     current_page_ := new TSPage();
     current_page_.Index := len;
     current_page_.PdfPage := page;
-    current_page_.Number := flag ? sect_ware_.SectPr.PgNumType.Start : page_array_[len-1].Number + 1;
+    current_page_.Number := flag ? ifnil(sect_ware_.SectPr.PgNumType.Start) ? 1 : sect_ware_.SectPr.PgNumType.Start : page_array_[len-1].Number + 1;
+    // println("len = {}, Number = {}", len, current_page_.Number);
     page_array_[len] := current_page_;
 
     // 页眉页脚