FPSpreadsheet: Fix ods chart reader crashing in EvalLengthStr()

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9424 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2024-09-04 16:12:57 +00:00 · 2024-09-04 16:12:57 +00:00 · f1db311177
commit f1db311177
parent d88247d1e8
1 changed files with 1 additions and 1 deletions
--- a/components/fpspreadsheet/source/common/fpsopendocumentchart.pas
+++ b/components/fpspreadsheet/source/common/fpsopendocumentchart.pas
@ -280,7 +280,7 @@ begin
    exit;

  units := '';
-  for i := Length(AText) downto 0 do
+  for i := Length(AText) downto 1 do
    if AText[i] in ['%', 'm', 'c', 'p', 't', 'i', 'n'] then
    begin
      units := AText[i] + units;