tinysoft
/
TSOffice
5
0
Fork 0
Code Issues 1 Pull Requests Projects Releases Wiki Activity

v1.5.3-patch1

This commit is contained in:
csh 2023-12-15 15:14:44 +08:00
parent c16566d2f1
commit 91f3c5af49
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
funcext/TSOffice/worksheet/xlsxWorkBook.tsf
View File

@ -40,7 +40,7 @@ Type xlsxWorkBook = Class
//workbook.Print(); //workbook.Print();
//workbook.Dump(); //workbook.Dump();
//echo tostn(workbook.dom()); //echo tostn(workbook.dom());
node := workbook.FirstChildElement('workbook').FirstChildElement('sheets').FirstChildElement(); node := workbook.FirstChildElement('workbook').FirstChildElement('sheets').FirstChildElement('sheet');
while ifObj(node) do Begin while ifObj(node) do Begin
name := node.GetAttribute("name"); name := node.GetAttribute("name");
sheetNames_[sheetsCount_]['name'] := name; sheetNames_[sheetsCount_]['name'] := name;
@ -50,7 +50,7 @@ Type xlsxWorkBook = Class
sheetNames_[sheetsCount_]['file'] := 'xl/' + rids[ rid ]; sheetNames_[sheetsCount_]['file'] := 'xl/' + rids[ rid ];
sheetIndexMap_[ LowerCase(name) ] := sheetsCount_; sheetIndexMap_[ LowerCase(name) ] := sheetsCount_;
sheetsCount_ ++; sheetsCount_ ++;
node := node.NextElement(); node := node.NextElement('sheet');
End; End;
files := zipfile_.Files(); files := zipfile_.Files();