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

v1.5.1

This commit is contained in:
csh 2023-11-15 10:51:24 +08:00
parent ee7b7164ce
commit b617f235fa
5 changed files with 14 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
funcext/TSOffice/TOfficeObj.tsf
View File

@ -1,4 +1,4 @@
// Version 1.5.0 // Version 1.5.1
Function TOfficeObj(n); Function TOfficeObj(n);
Begin Begin

2
funcext/TSOffice/TSDocxFile.tsf
View File

@ -1,4 +1,4 @@
// Version 1.5.0 // Version 1.5.1
Type TSDocxFile = Class Type TSDocxFile = Class
///Version: V1.0 2022-09-20 ///Version: V1.0 2022-09-20

8
funcext/TSOffice/TSUtils/TSImage.tsf
View File

@ -71,12 +71,14 @@ Type TSImage = Class
Begin Begin
des1 := 0xff; des1 := 0xff;
des2 := 0xc0; des2 := 0xc0;
des3 := 0xc2;
flag := 1; flag := 1;
while flag do while flag do
begin begin
stringObj_.Read(byte1, 1); r1 := stringObj_.Read(byte1, 1);
stringObj_.Read(byte2, 1); r2 := stringObj_.Read(byte2, 1);
if byte1 = des1 and byte2 = des2 then flag := 0; if r1 = 0 or r2 = 0 then break;
if byte1 = des1 and (byte2 = des2 or byte2 = des3) then flag := 0;
end end
if flag then return array(0, 0); if flag then return array(0, 0);
stringObj_.Read(tmp, 3); stringObj_.Read(tmp, 3);

2
funcext/TSOffice/TSXlsxFile.tsf
View File

@ -1,4 +1,4 @@
// Version 1.5.0 // Version 1.5.1
Type TSXlsxFile = Class Type TSXlsxFile = Class
///Version: V1.0 2022-08-08 ///Version: V1.0 2022-08-08

6
更新日志.md
View File

@ -1,5 +1,11 @@
# 更新日志 # 更新日志
## 2023-11-15
### V1.5.1
1. 支持识别图片中含有`0xffc2`段的jpg格式的大小
## 2023-11-14 ## 2023-11-14
### V1.5.0 ### V1.5.0