页码起始页为1
This commit is contained in:
parent
f251782186
commit
3b16e6969f
|
|
@ -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_;
|
||||
|
||||
// 页眉页脚
|
||||
|
|
|
|||
Loading…
Reference in New Issue