tinysoft
/
PdfConverter
5
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

修复.cache文件夹的创建

This commit is contained in:
csh 2024-06-27 13:58:32 +08:00
parent e3ffbae915
commit f72b734cc4
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
TSDocxToPdf.tsf
View File

@ -77,6 +77,8 @@ begin
elements := sect_ware.Elements(); elements := sect_ware.Elements();
for _,element in elements do for _,element in elements do
begin begin
println("_ = {}", _);
if _ = 266 then return;
if element.LocalName = "p" then self.TransformParagraph(sect_ware, element); if element.LocalName = "p" then self.TransformParagraph(sect_ware, element);
else if element.LocalName = "tbl" then self.TransformTable(sect_ware, element); else if element.LocalName = "tbl" then self.TransformTable(sect_ware, element);
end end
@ -126,7 +128,9 @@ end;
function TSDocxToPdf.InitCachePath(file: string); function TSDocxToPdf.InitCachePath(file: string);
begin begin
path := format("%s_%s", extractFileName(file), formatDatetime("YYYYMMDDHHNNSSZZZ", now())); path := format("%s_%s", extractFileName(file), formatDatetime("YYYYMMDDHHNNSSZZZ", now()));
cache_path_ := format("%s/funcext/PdfConverter/.cache/%s/", extractFileDir(sysExecName()), path); cache_dir := format("%s/funcext/PdfConverter/.cache", extractFileDir(sysExecName()));
createDir("", cache_dir);
cache_path_ := format("%s/%s/", cache_dir, path);
createDir("", cache_path_); createDir("", cache_path_);
end; end;