fpspreadsheet: Fix search engine crashing when search string is empty. Patch by forum user russeld (https://forum.lazarus.freepascal.org/index.php/topic,54026.0.html).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7987 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-04-09 20:14:29 +00:00
parent 1c2fa6baab
commit 87e8e3b80f

View File

@ -464,6 +464,9 @@ begin
txt := AWorksheet.ReadAsText(cell); txt := AWorksheet.ReadAsText(cell);
end; end;
if txt = '' then
exit(false);
if soRegularExpr in FSearchParams.Options then if soRegularExpr in FSearchParams.Options then
Result := FRegEx.Exec(txt) Result := FRegEx.Exec(txt)
else else