fpspreadsheet: Fix utility function GetAttrValue crashing if Node has no attributes (http://forum.lazarus.freepascal.org/index.php/topic,30769.0.html, patch by "vk_barnaul").

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4403 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2015-12-17 11:12:45 +00:00
parent b3ee66fb2f
commit a8dc2255dc

View File

@ -48,7 +48,7 @@ var
Found: Boolean;
begin
Result := '';
if ANode = nil then
if (ANode = nil) or (ANode.Attributes = nil) then
exit;
Found := false;