Переглянути джерело

fcl-image: canvas AllocateResources: propagate exceptions to be able to properly handle (e.g. log) them

git-svn-id: trunk@43335 -
ondrej 5 роки тому
батько
коміт
13641eb1cf
1 змінених файлів з 2 додано та 0 видалено
  1. 2 0
      packages/fcl-image/src/fphelper.inc

+ 2 - 0
packages/fcl-image/src/fphelper.inc

@@ -114,6 +114,8 @@ begin
   except
     FCanvas := nil;
     FAllocated := False;
+
+    raise;
   end;
 end;