diff --git a/TSDocxToPdf.tsf b/TSDocxToPdf.tsf index 8dd1a1e..ee8561b 100644 --- a/TSDocxToPdf.tsf +++ b/TSDocxToPdf.tsf @@ -77,6 +77,8 @@ begin elements := sect_ware.Elements(); for _,element in elements do begin + println("_ = {}", _); + if _ = 266 then return; if element.LocalName = "p" then self.TransformParagraph(sect_ware, element); else if element.LocalName = "tbl" then self.TransformTable(sect_ware, element); end @@ -126,7 +128,9 @@ end; function TSDocxToPdf.InitCachePath(file: string); begin 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_); end;