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

v1.6.8-patch1

This commit is contained in:
csh 2024-04-17 16:22:48 +08:00
parent 53d83f91ae
commit c3432d1812
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
funcext/TSOffice/worksheet/xlsxStyles.tsf
View File

@ -177,7 +177,7 @@ Type xlsxStyles = Class
else begin else begin
if ifstring(value) then if ifstring(value) then
begin begin
if trystrtodatetime(value, r) or trystrtodate(value, r) then return array('n', r); if (pos("-", value) or pos("/", value)) and (trystrtodatetime(value, r) or trystrtodate(value, r)) then return array('n', r);
if trystrtofloat(value, r) then return array("n", value); if trystrtofloat(value, r) then return array("n", value);
return array("s", value); return array("s", value);
end end